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INTRODUCTION 


AMSTRAD behaves quite extraordinarily. Hardly has the CPC 464, thanks 
to its low price and excellent performance, won a place for itself on the 
computer market in the face of stiff competition than along comes the next 
computer, in the form of the CPC 664. And not even 3 months had passed 
before a third computer in the CPC series, the CPC 6128, made its 
appearance in the computer shops. These two successors to the 464 are also 
remarkable for their excellent price/performance ratio. 


The completeness of the system is even more impressive than that of the 464. 
Thanks to the colour or green monitor that comes with the computer, 
bickering over whether to watch Dallas or use the computer will no longer 
cast a cloud over family life; those annoying connecting leads, which only 
serve to trip you up, are a thing of the past. The built-in floppy disk 
considerably reduces the usual tangle of cables and we can now thankfully 
forget about all those expensive memory extension units or interface cards. 
Everything you need to get started is included. 


To start with, LOCOMOTIVE BASIC is undoubtedly the best that can be had 
for the money. One particular "good point" is the very flexible use of 
Interrupts, which this form of BASIC includes. 


The excellent graphics and the possibility of displaying 80 characters on the 
screen without any need for additional programs or add ons are unrivalled. 
Other computers in this price range often have some trouble in getting 40 
legible, flicker-free characters per line onto the screen. 


The 640x200 point graphics resolution is just as unique in this price range. 
Only the IBM PC, for instance, can offer a comparable performance and 
this, of course, costs at least five to eight times more than a CPC. 


The sounds the CPC can produce are impressive too. Of course, even with 
the most skilful programming, you will never reproduce the sweet tones of a 
Stradivarius, but then what you opted for was a high-performance computer, 
and not a violin. 


As to speed, the CPC is very impressive. The built-in Z80 processor operates 
at a clock rate of 4MHz and has a very powerful command language which 
was enhanced by the designers. The result is a very quick, flexible BASIC 
Interpreter waiting to be used. 
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But sooner or later (usually sooner), almost all computer owners start to 
‘want more information and to know more about their computers. The CPC 
Operating Handbook is quite admirable, but is not enough on its own. This is 
particularly true when the limitations of BASIC have been exceeded and the 
power of machine is needed. We then need information which goes far 
beyond the content of an operating handbook. 


You will find the usual ROM Listing of the ANATOMY Series in a new, 
more compact form here. We have dispensed with the actual listing in favour 

“of more extensive comments. However, with the help of the Disassembler 
reproduced in this book, you can produce up your own listing whenever you 
please. This will, in any case, be an appropriate way of documenting 
operating systems in future as they are taking on ever greater proportions 
and the traditional method of documentation would be beyond the scope of a 
normal book. 


The authors. 
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1.1 What you Need to Know about your Machine 


In all, your CPC contains six highly integrated IC's. The CPC's processor, 
which is the most important component of any computer, is a Z80. The other 
built-in components are: an HD 6845 Video Controller, an 8255 Parallel 
Port, an AY-3-8912 Sound Chip, a 765 Floppy Disk Drive Controller and a 
"Gate Array" specially developed for the CPC. 


The task of the Video Controller is to provide all the signals required to 
operate the monitor including addressing the monitor RAM, i.e. the storage 
area that contains the characters and graphics to be displayed. In addition, it 
generates the refresh required for the RAM without which they would soon 
lose their information. 


The Sound Chip functions as its name suggests. The designers have made a 
very good choice. The AY-3-8912 has been used in many computers because 
it offers a wide, diversified range of means for varying sound effects. 


The 8255 is the CPC's "work-horse". It performs a very large number of 
tasks. These range from keyboard control to control of the Sound Chip, and 
on to control of the Recorder, as well as interpreting the various functions of 
the CPC. 


The 765 floppy disk drive controller together with IC circuitry provides an 
interface for up to two disk drives. The Floppy Disk Controller has complete 
control of the disk drives, and its "intelligence" simplifies programming. 


The Gate Array is of particular interest. This component controls many 
things in the CPC and deserves to rank as an auxiliary processor. The Gate 
array controls many of the display screen tasks which includes the 
representation of different colours and the various line formats. 
Furthermore, all the timing pulses required are generated in the Gate Array. 
The Interrupt signal, which interrupts the normal program sequence 300 
times per second, is generated by the Gate Array, in the same way as the 
signals used to control the CPC's RAM. 
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1.1.1 Memory Allocation 


Up to 5 years ago, computers with 16K of RAM were considered to be 
adequate. Only with the arrival of the Commodore C64 was storage capacity 
substantially expanded. A computer manufacturer can only hope to have a 
reasonable chance of marketing his machine if it can at least display the 
magic "64". However, as the prices of memory components have dropped 
drastically over the last few months, the price of a 64 Kbyte computer (e.g. 
CPC664) differs little from the price of a 128 Kbyte computer (e.g. 
CPC6128). 


Since the conventional 8-bit processors can address 64Kbytes, this amount of 
storage area can be easily placed in a computer. The Z80 of the CPC can 
address 64K of memory without using any tricks. As not just the RAM of the 
CPC but also the ROM have to be addressed, a number of difficulties arise. 
However, the CPC designers have found a very neat way around them. The 
Bank Switching used in the CPC to switch over, as required, between RAM 
and ROM, is carried out with a minimum of hardware and some very 
efficient software. The additional 64 Kbytes of RAM in the 6128 are also 
handled with the help of Bank Switching. 


The picture for the CPC 6128 is then as follows (NB - the same applies to the 
464/664, except that there is no additional 64K RAM bank). The 64K of 
RAM is addressed continuously. "Parallel" to this, although not addressed 
directly, is located the additional 64 Kbyte bank and in the lower 16K 
(&0000 to &3FFF) half of the 32K ROM. The second half of this ROM is 
located in the upper 16K (&C000 to &FFFF). 


The lower 16K of ROM contain the computer's operating system, including 
the routines for controlling the Recorder and memory switch-over. The 
operating system contains all the routines that the CPC needs in order to read 
a keyboard character or to display a character or graphics dot on the screen, 
but the Recorder and the Printer Interface, as well as the sound, are also 
controlled via the operating system. 


The upper 16K contain the BASIC Interpreter. Parallel to this area is located 
the ROM of AMSDOS, which contains all the routines needed to operate the 
floppy disk drive. As if this were not enough, up to 251 additional ROM's 
can be "switched" to this area. These ROM's may contain, for example, other 
programming languages, BASIC expansions, or games. 


Graphically, the memory allocation can be illustrated as in Figure 1.1.1.1. 
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1.1.2 Command Extension via RST 


The operating system programmers have done a great job to make access to 
the different ROM's as simple as possible. Special programs and the skilful 
use of the RESTART commands of the Z80 permit, as it were, an extension 
of its command repertoire for restarts RST1 to RSTS. These RST's can be 
used in the same way as the usual JMP's or CALL's. For certain RST's, 
however, a 3-byte address is required. The ROM to which the JMP or CALL 
is to go is then defined in the additional third byte. 
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BANK 0 
FFFF 
Block 3 
C000 
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8000 
Block 1 
4000 
Block 0 


0000 
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RAM ROM ROM 


BANK 1 


Block 3 BASIC AMSDOS Max. 251 exp. ROM's 


Block 2 


Block 1 


Block 0 Operating system 


1.1.1.1 Memory Allocation in the CPC 
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LOW JUMP RST 1 


This command is used to call up a routine in the operating system or in the 
RAM below. The address of the routine to be called must be placed directly 
after the RST command. As 14 address bits suffice for the range from 0 to 
&3FFF, the upper two bits are used to select either ROM or RAM: 


Bit 14=0 Operating system selected 

Bit 14=1 RAM selected 

Bit 15=0 BASIC ROM selected 

Bit 15=1 RAM selected. 

A call for operating system routine &1410 could thus look like this: 

RST 1 

DW &1410 + &8000 

Bit 15 is used to select the &C000 to &FFFF area of the RAM, while reset bit 


14 is used to address the operating system. 


The code at address 8 consists solely of a jump to &B98A. 


SIDE CALL RST2 


This restart command is used to call a routine in an expansion ROM. If a 
program, taking the form of a ROM module, requires more than 16 Kbytes 
and there is no more room in an expansion ROM, using SIDE CALL, a 
routine can be called in the second, third or fourth corresponding ROM, 
without any need to know the absolute number of the ROM concerned. The 
RST 2 command must be followed by the address of the routine - &C000, i.e. 
the relative address with respect to the start of the ROM. The higher-order 
two bits are used to select the four different ROM's. 


Address &0010 contains a jump to &BAID. 


FAR CALL RST 3 


Using this command, you can call a routine anywhere in the ROM or RAM. 
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To do this, the RST 3 command must be followed by the 2-byte address of a 
parameter block consisting of three bytes. These first two bytes contain the 
address of the routine to be called, while the third byte must contain the 
desired ROM/RAM status. Values 0 to 251 are used to address the 
corresponding additional ROM. The functions of the remaining four values 
are as follows: 


Value &0000-&3FFF &C000-&FFFF 
252 Operating system BASIC 

253 RAM BASIC 

254 Operating system RAM 

255 RAM RAM 


Address &0018 contains a jump to &B9C7. 


RAM LAM RST 4 


You can use this RST command to read the contents of the RAM from a 
machine language program, regardless of the selected ROM status. The RST 
4 command then replaces the command: 


LD A,(HL) 

HL must, therefore, contain the address of the cell to be read. Address 
&0020 contains a jump to &BAD6. 

FIRM JUMP RST 5 

This RST command can be used to jump to a routine in the operating system. 
For this purpose, the address must immediately follow the RST 5 command. 


The operating system ROM is enabled before the jump to the routine, and 
then disabled upon return. Address &0028 contains a jump to &BA35. 
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1.2 The Z80 Processor 


It was in the early seventies that microprocessors began their significant 
advance. The firm of INTEL cornered a large share of the market with its 
8080 Processor as there was practically no competition in this range when it 
was first introduced. This is apparent if we look more closely at the 
processor's deficiencies. For instance, the 8080 still requires three different 
operating voltages and two additional IC's to generate control signals and 
clock pulses. 


Between 1974 and 1975, ZILOG developed the Z80. However, instead of 
developing a new processor from scratch, they kept to the very successful 
principle of the 8080. This is why the Z80 is upwards- compatible from the 
8080, i.e. all the programs written for a 8080 can also be run using a Z80 
processor. 


Naturally, all the characteristics of the 8080 that were found to be 
undesirable in the process were eliminated and the command language was 
substantially extended. Furthermore, the Z80 only requires an operating 
voltage of +5V, and costly external IC's to generate control signals are 
unnecessary. 


Let us take a look at the physical characteristics of this processor before 
examining it in more detail. 


8-bit processor using NMOS technology 
16-bit address bus 

Single 5V power supply 

Single clock pulse 

TTL-compatible 

Optionally 2.5, 4, 6 or even 8 MHz clock rate 
Software-compatible with 8080 

Duplicate register set, plus two index registers 
Non-maskable interrupt input 

Maskable interrupt input with three operating modes Automatic refresh for 
dynamic RAM 

Direct link-up 8080 - Peripherals - IC's. 
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These physical characteristics, together with the large range of ready-made 
software available, have made the Z80 one of the most successful 8-bit 
processors. Only one other processor, the 6502, has achieved comparable 
popularity in the field of home and personal computers. 


1.2.1 Z80 Connections 


After this brief look at the performance characteristics of the Z80, we shall 
now turn to the way in which its 40 pins are allocated. 


The connections of the Z80 can be divided into four groups: Data Bus, 
Address Bus, Control Bus and Supply Lines. 


Address_bus 


AO - Al5 : Address lines : these are used to select a cell in the address 
range. The address range contains 65536 storage locations. When using the 
I/O commands, the lower 8 address bits serve to output the corresponding 
I/O address. In this way, it is possible to have 256 different ports. With 
certain restrictions on the commands, it is even possible to address 65536 
ports. All 16 address lines are then used to form the port address. We shall be 
returning to this special case later. 


Data bus 


D0 - D7 : Data lines : the data flows to and from the processor via these 
bidirectional lines. They provide interconnections between the processor and 
the cell or port address selected using the address bus. 


Control bus 


M1* : Machine cycle one : this control signal indicates that the 
processor is reading the operation code off the data bus. Incidentally, the 
asterisk is used to indicate that this signal and those that follow are active 
low. 


MREQ* : Memory REQuest* : when this output signal is low, it 
indicates that the processor is writing to or reading from a storage address 
and that the address on the address bus is valid. 


IORQ* : Input/Output ReQuest* : when this output signal is low, it 
indicates that the processor is writing to or reading from a port address and 


10 


First Publishing Anatomy of the CPC's 





that the port address on the address bus is valid. 


RD* : ReaD* : this output signal is low if the processor wants to read data 
from a cell or port address. In association with MREQ* and IORQ%, it is 
possible to differentiate between reading from a memory and reading from a 
port. 


WR* : WRite* : this Z80 signal goes low if, when the Z80 is reading from 
memory or port addresses, the data on the data bus is valid. Here again, by 
associating WR* with MREQ* and IORQ¥*, it is possible to differentiate 
between data written into the memory or a port address. 


RESET? : If this input signal goes low, the program 


counter is loaded with the value &0000, the interrupts are disabled and 
interrupt mode 0 is turned on. As soon as the output goes high again, the 
processor starts the program as from address &0000. 


NMI* : Non maskable interrupt* : a high-low edge at this input always 
interrupts the processor's current program. The program counter is loaded 
with the values stored at addresses $0066 and $0067, and the program is 
resumed at this point. 


IRQ* : Interrupt ReQuest* : the program the processor is currently 
running can be interrupted by a low at this input if this type of interrupt is 
enabled by a command. The results differ according to the choice of 
interrupt mode, and will be discussed later. By contrast with NMI*, IRQ* is 
a static signal and must be applied until the interrupt request is detected. 


WAIT* : This signal can be used to adapt the read or write access of the 
Z80 to slower memories or to special system conditions. 


BUSRQ* : BUSReQuest* : if this input goes low, after the current 
command has been executed, address and data lines, as well as all the output 
control lines, become high impedance and the BUSAK* signal goes low. A 
second processor could now access the memory and take over the peripheral 
components; however, this signal is used primarily for DMA (DMA=Direct 
Memory Access, very high-speed data transfer bypassing the processor). 


BUSAK* : BUSAKnowledge* : this represents the output signal cor- 
responding to BUSRQ*. When it is low, it indicates to the DMA controller 
or second processor that all control and bus signals are high impedance and 
that access is now possible. 
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HALT* : This output goes low after the processor has executed the 
machine language command HALT. After this command, the processor does 
not "do" anything else; it just executes NOP's to ensure refresh. It can only 
be "woken up" again by an interrupt. 


RFSH*_ : ReFreSH* : this output signal indicates that there is a valid 
refresh address on the seven lower address lines. As the processor only 
requires the address bus and data bus at given times, the address bus can be 
used to refresh dynamic RAM's in the remaining time, without any need for 
costly electronics or special refresh routines. 


Clock Pulse and Power Supply 


0: Phi : The phi input provides the clock pulse for the processor. As the 
Z80 is a static IC, the clock pulse can range from OHz to the specified 
maximum frequency. The form of the clock signal does, of course, have to 
satisfy certain requirements. According to the data sheet, the maximum low 
time for this signal is 2 microseconds. This is only of academic interest, 
however, since what we want, of course, is to supply the processor with the 
highest possible clock rate so that it will run programs quickly. 


GND : Processor earth. 


Vcc : This is the lead that feeds the Z80, say +5V direct current and 
approximately 150 to 200 milliamperes. 
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1.2.1.1 Z80 Pin Assignments 


All (f © A410 
A112 () O ag 
A13 () O As 
Ala 0 (o> “AR? 
A115 () O A6 
@ O O AS 
D4 0 O a4 
D3 0 O A3 
D5 0 O A2 
D6 0 O Al 
+5V 0 O Ao 
D200 () GND 
D7 0 (.) RFSH* 
DO () O mi1* 
D1 0 (.) RESET* 
INT* () ( BUSRQ* 
NMI* () (C) WAIT* 
HALT* () () BUSAK* 
MREQ* () © wR 
IORQ* () © RpD* 
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1.2.2 Z80 Register Set-Up 


As mentioned at the beginning, the Z80 has been designed in such a way that 
it can use the programs of the 8080 without any changes. The Z80 has, of 
course, a much larger number of registers. 


But what is a register? 


A register is quite simply a write/read memory on the processor chip. Each 
processor has to have a minimum number of registers. These are the cells in 
which data is stored and the results of mathematical and logical commands 
are filed. Other registers have special functions, such as stack management, 
or are used as program counters. 


As operations such as data transfer between two registers or the summing of 
the contents of two registers are not handled via the data bus, they can be 
carried out far more quickly than if the values required had to be fetched 
from external storage locations. 


Roughly speaking, processors with a large number of registers are superior 
to those with less internal storage capacity when it comes to running the same 
programs, since data transfer is always faster inside a processor than transfer 
to and from external storage locations. 


The Z80 has a total of 22 registers, 18 8-bit registers and four 16-bit 
registers. Their allocation is illustrated in figure 1.2.2.1. 


You will see that some of the registers are delimited by thicker lines. These 
are the registers also contained in the 8080. You will also notice that most of 
the 8-bit registers, i.e. A, F, B, C, D, E, H and L are duplicated in the Z80, 
and the programmer can use a command to choose between the two sets. 


We shall be referring to only one register set from now on. This is, in fact, 
correct since the CPC 464 programmer will only have one register set at his 
disposal in any case unless he uses special tricks. The alternative register set 
is used by the operating system for interrupt control. However, you will 
notice that all the tasks of one register set can be taken over by the alternative 
set if the latter is not being used for special purposes. 


Registers B to L are general purpose 8-bit registers, while registers A and F 
are allocated special tasks. 
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The A register is generally known as the accumulator. The accumulator 
receives the results of all arithmetic and logic operations having a 8-bit 
format. For these operations, an operand must also be stored in the 
accumulator. For example, in order to add two bytes, one operand has to be 
stored in the accumulator, while the other operand can be contained in 
another register or in the storage external to the processor. After the 
addition has been carried out, the result is stored in the accumulator. As the 
results of these operations can become too large to be expressed with only 8 
bits (255+255=510), a further bit is required in order to show the results 
correctly. This task is carried out by the F register. The F register, generally 
known as the flag register, is divided up into individual bits. One of these bits 
has the task (among others) of storing any carry from such additions. Other 
bits indicate whether the result of calculations or comparisons is equal to 0, 
etc. 


Registers B to L do not need to be addressed individually. B, C, D and E, as 
well as H and L can also be paired respectively to form 16-bit registers. 
These double length registers are then appropriately identified as BC, DE 
and HL, using the names of the two individual registers concerned. 
Double-length registers are particularly suitable for addressing tables and 
for moving and searching data blocks. The HL double-length register also 
has another special function. As the Z80 features commands for adding and 
subtracting 16-bit values, the HL functions as a 16-bit accumulator for such 
instructions. 


PC, SP, IX and IY only work with 16-bit values (NB: as specialists will 
know, it is also possible to manipulate the index registers byte-wise, but we 
shall be considering IX and IY as simple 16-bit registers). 


PC is the program counter. The contents of the PC are placed on the address 
bus as an address for external stores. At each command, the PC is 
automatically incremented (increased by one). When commands comprise 
more than one byte, the PC is automatically incremented by the required 
number. If jumps are required in a program, the new program address is 
automatically loaded into the PC, and the processor continues running the 
program from this address. 


The SP is the stack pointer. The stack is required if a program calls 
subroutines. In this case, the return address is automatically placed on the 
stack, and then re-loaded into the PC after the end of the subroutine. 


When special commands are used, the two 16-bit registers, IX and IY, are 
particularly effective when working with tables. 
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This leaves the two registers I and R. The I register, or Interrupt register, is 
used in conjunction with the special interrupt mode: IM3. In this mode, the 
interrupt-generating component has to supply a 8-bit value at the request of 
the processor. This value, as the low byte, together with the contents of the I 
register, as the high byte, go to form the address of the interrupt routine. 
The R, or Refresh, register is required in connection with the refresh 
function 

automatically carried out by the Z80. Each time a command has been 
fetched, the lower seven bits of this register are automatically incremented. 
The eighth bit always remains zero or one, depending on programming. 
Neither the I nor the R register is used in the CPC 464. As it is not possible to 
specify the status of the R register, and the value changes continuously, this 
register can be used as a random number generator. 
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1.2.2.1 Z80 Register Set 
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1.2.3 Special Features of the Z80 as used in the CPC 


The versatility of the Z80 gives hardware and software designers a free hand 
in producing a computer. This CPU (central processing unit) can be used 
equally effectively in both minimum systems and in such powerful machines 
as the CPC computers. 


Indeed, those who developed the CPC used their knowledge to achieve 
maximum performance with a minimum of components. This led to a certain 
number of special features which should be understood in order to program 
and use the machine 

effectively, particularly in the case of machine language. We shall now blook 
at these special features in more detail. 


First is the CPC interrupt control function. The only interrupt source in the 
CPC is the Gate Array, which is largely 

responsible for the performance of the computer. Every 3.3 milliseconds, 
i.e. 300 times per second, the gate array generates a short pulse, which it 
applies to the IRQ* input of the Z80. The NMI* input of the processor is not 
used and is available for any extensions required using the expansion 
connector. 


The frequency of the interrupt signal is obtained from the H-Sync signal of 
the CRTC 6845 via a frequency divider. This stage divides the H-SYNC 
pulse occurring approximately every 65 microseconds by 52. 


As the Z80 in the CPC is operated in interrupt mode IM1, each interrupt IRQ 
detected produces an RST7 or a CALL &0038. The processor then 
immediately interrupts the program which is running, places the current 
status of the PC on the stack and branches to address &0038. This contains a 
jump for the CPC to the address of the actual interrupt routine. The point at 
which the interrupt has occurred is registered on the stack. This enables the 
interrupted program to be resumed after the interrupt routine has ended. 


As the IRQ* input of the processor is also applied to the expansion 
connector, how does the processor differentiate btween a Gate Array 
interrupt and an external interrupt? Within the interrupt routine, the 
interrupt is briefly re-enabled. As the pulse generated by the gate array only 
lasts for a maximum of 5 microseconds, this enabling is not affected by the 
Gate Array. External interrupt sources, however, remove their signals only 
when instructed by the processor. If such an external interrupt occurs, the 
interrupt routine is thus itself interrupted. But this case can be detected and 


18 


First Publishing Anatomy of the CPC's 





given special treatment. In this way, it is also possible to have external IRQ* 
sources. The only requirement is that their pulses should be sufficiently long. 


The second point is the restricted use of port commands. 


In conjunction with the IORQ* signal (input/output ReQuest), the Z80 can 
address a maximum of 256 different ports in the same way as storage 
locations. To do so, the address of the port required is stored in the lower 8 
address bits, AO to A7. These ports are used primarily to connect up 
peripheral units. 


With other processors that do not possess the port addressing facility, 
designers always have to adopt the expedient of addressing the peripheral 
units as storage locations. This is known as the memory-mapped method and 
has the drawback of reducing the address range available to the RAM. 


The Z80 can use IN and OUT commands in order to use the port addressing 
feature. If we take a closer look at these commamds, we shall find that 
commands IN(C),r and OUT(C),r offer an awkward way of addressing 
more than the 256 original ports. When these commands are used, the states 
of the lower 8 address bits are determined by the contents of the C register; 
in addition, however, the contents of B are stored at address bits A8 to A1S. 
This means that a total of 65536 port addresses are available. 


It is precisely this feature of the Z80 that has been exploited by the CPC 464 
designers. All peripheral IC's can be selected using address bits A8 to A1S. 


Unfortunately, there is often a disadvantage to such methods. In this case the 
commands of the Z80 are considerably reduced. All the other I/O commands 
of the Z80 can no longer be used. This applies particularly to I/O commands 
with an automatic loop feature. They use the B register as a counter and are 
not, therefore, available as "suppliers" for the high byte of the port address. 
The particular commands concerned are: INI, INIR, IND and INDR, as well 
as OUTI, OTIR, OUTD and OTDR. 


The use of wait cycles can be regarded as the third special feature of the 
CPC. 


The need for this connection on the Z80 comes from the days when the 
available memory IC's were very slow. The first EPROM's, in particular, 
took up to one microsecond after addressing to get the data ready to use. 


In order to use the Z80 with these slow memories, a certain waiting time was 
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required. This waiting time can be generated by the WAIT* signal. After 
every negative-going edge at the clock pulse input, the processor checks the 
condition of the WAIT* connection. If it is zero volts, the Z80 introduces a 
so-called wait cycle which lasts for the length of the pulse. After the clock 
signal has ended, i.e. at the negative-going edge, the condition of the WAIT* 
line is re-checked, and so on. 


However, the fact that this signal is used in the CPC has nothing to do with 
the memory IC's. These are fast enough for a Z80 operating at 4MHz. 
However, there is a need to synchronize the processor and the Video 
Controller. As both IC's can access the memory, there must be a means of 
determining which is the first at a given time. The Video Controller has 
unconditional priority since there could otherwise be considerable 
interference with the display on the monitor. To achieve this 
synchronisation, a WAIT* signal is generated at every fourth clock pulse. 
Although the processor is operated at 4MHz (Megahertz = millions of cycles 
per second), an effective operating frequency of approximately 3.3MHz is 
obtained through the use of WAIT cycles. 


The BUSRQ* and BUSAK* signals, the control signals for DMA operation, 
are not used in the CPC. However, they are transmitted to the Expansion 
Connector, where they are available for external expansions. 


The HALT* signal is not used in the CPC either, but is also available at the 
Expansion Connector. 
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1.3 The Gate Array, the System Coordinator 


Almost all the components in the CPC are commercially available. They can 
be purchased in any well equipped electronics shop. The only exceptions are 
the ROM and the gate array, identified as IC116 in the circuit diagram. This 
is the IC that we shall be discussing in this section. 


This 40-pin IC has been developed specially for the CPC and performs a 
number of important tasks. If we were to reproduce all the integrated 
functions using TTL gates, the number of IC's in the CPC would soon be 
more than doubled. The tasks of the array include: 


Generation of all the necessary clock rates 

Generation of the signals to operate the dynamic RAM 
Control of access to the RAM 

Turning the ROM on and off in the storage area 

Generating video signals 

Generating RGB information for the colour monitor 

Controlling the monitor mode 

Storing ink colours 

Generating the Interrupt pulse. 


Unfortunately, there is very little available information on this interesting 
IC. Nowhere can a data sheet or a comparable description be found as the 
manufacturer presumably considers its inner workings as a trade secret. Our 
efforts and attempts to research the functions of the IC as thoroughly as 
possible were, however, very successful, and the results are described in this 
section. 


1.3.1 Pin Descriptions of the Gate Array 


Before we can discuss the functions of the individual connections of the Gate 
Array, some preliminary information is required. There are now at least 
three versions of the Gate Array. In the CPC 464, the first CPC computer, 
the IC bore the number 40007. This IC became so hot in operation that it had 
to be cooled by fitting it with an aluminium plate. This was not a long-term 
proposition since, even with additional cooling, there was a risk that the IC 
could be destroyed by overheating. In the CPC 664, the IC 40008 was used. 
It proved possible to reduce the dissipation of energy by making changes to 
internal arrangements. This version only became slightly warm. Finally, in 
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the CPC 6128, the IC 40010 has been brought into use. In this IC, the 
sequence of connections has been altered. Optionally, the older versions of 
the Gate Array can also be used in the 6128. There is sufficient room on the 
circuit board. 


When describing the connections, we have confined ourselves to the pin 
layout of the version used in the CPC 6128. The numbers in brackets relate 
to the older versions of the Gate Array used in the 664 and 464. 


The signal in the CPC upon which everything else depends is the "quartz 
signal", at a frequency of 16MHz, applied to pin 24 (pin 8) (XTAL). This 
frequency is generated by a typical oscillator circuit made up of two gates 
and represents, as it were, the heartbeat of the CPC. 


The input frequency, divided by four, is supplied to the processor as a 4MHz 
clock signal phi at pin 19 (pin 39). 


After being divided again by four, a frequency of 1MHz is obtained. This 
signal is provided at pin 14 (pin 1) of the gate array. 


The 1MHz signal has two uses. Firstly, it is the timing signal for the Sound 
Chip and, secondly, it determines whether the processor or the CRTC can 
address the RAM. When the signal is low, the Address Lines of the processor 
are switched to the RAM via multiplexer IC's 74LS153. 


As control of the RAM in the CPC is easy, you will find an extensive 
description of the RAM control signals in a later chapter. 


As the RAM components have only 8 Address Lines, the entire 16- bit 
address has to be applied to the inputs in multiplexed form, i.e. in 
chronological order. This time control system is provided by the following 
signals: CAS ADDR* pin 31 (pin 6), CAS* pin 16 (pin 3) and RAS* pin 34 
(pin 7). The RAS* and CAS* signals are applied directly to the RAM's, while 
the CAS ADDR* signal is sent to the multiplexers already mentioned. 


The MAO/CCLK signal at pin 4 (pin 40) of the gate array also has a 
frequency of 1MHz. This signal is, however, phase~-shifted with respect to 
CPU ADDR*%, i.e. the two frequencies are high at different times. 
MAO/CCLK also has a dual function. Firstly, it provides the timing pulse for 
the CRTC, which derives all the other signals from it and, secondly, it is 
applied as an auxiliary address bit to one of four address multiplexers. The 
function of this auxiliary address bit will also be explained in greater detail 
later in connection with RAM control. 
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In addition, the Gate Array generates the RAMRD* signal at pin 29 (pin 13). 
This pin goes low when the processor wishes to read data from the RAM 
after an address has been applied and informs the Array of this by applying 
its RD* signal to pin 21 (pin 19). As the ROM and RAM overlap to a large 
extent, the processor's RD* signal cannot be used directly. If data is to be 
read from the ROM, the RAMRD* signal remains high and the outputs of 
DATA LATCH/ BUFFER 74LS373 become high impedance. As a result, no 
information can reach the data bus from the RAM at these times, although 
the memory address has reached the RAM and it has a byte ready at its 
outputs. 


In addition to RAMRD*, the READY signal is applied to the IC74LS373 by 
pin 22 (pin 2) of the GA. This signal generates the signal for inserting the 
wait cycles at the processor. As a result of additionally applying the READY 
signal with the Latch/ Buffer, the information on the processor Data Bus 
does not alter during the wait cycles. The 74LS373 stores the current output 
data after a high has been applied to pin 11 until this pin goes low again. 
After this, the IC simply acts as a buffer, i.e. the outputs directly follow the 
changes in the inputs. 


The ROMEN* signal at pin 27 (pin 12) of the GA goes low when the 
processor wishes to read data from the ROM. The CPC's built-in 32K 
BASIC and Operating System ROM occupies address ranges &0000 to 
&3FFF and &C000 to &FFFF and is thus addressable in two independent 
halves. The GA has to be informed, via an OUT command, whether data is to 
be read from the ROM or the RAM in the overlapping storage areas. When 
doing this, it is possible to activate only half of the ROM. 


The GA decodes the condition of Address Lines Al4 and A15 according to 
the desired storage configuration. Depending on the memory requested, 
either the RAMRD* or ROMEN* signal will be read-active. 


A Write command from the processor always goes to the RAM, regardless 
of the selected storage configuration. For this purpose, the GA generates the 
MWE* signal. 


In addition to the functions described, address lines A14 and A1S at pins 28 
(20) and 30 (21) are also used for another purpose. The GA also has a port 
address which is used to program the different possibilities of the GA. The 
port address is &7FOO and is decoded via the Address Lines (A14 high, A15 
low) and signal IORQ* at pin 17 (18). 
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As the Z80 data bus is not directly connected to Data Lines DO to D7 of the 
GA, the array sets pin 244EN* low if port address $7F00 in the above 
described mode is detected. This enables the outputs of 74LS244 (a data bus 
buffer), and the byte supplied by the Z80 can be written into the array. 


But signal IORQ* also has a double meaning for the GA. A special feature 
intrinsic to the Z80 is that, when an interrupt is detected, signals IORQ* and 
MI1* are set low. This condition is detected by the GA and the interrupt pulse 
is immediately disabled. If, on the other hand, the IRQ is turned off using 
command DI, Disable Interrupt, pin 32 (10) of the GA will remain low until 
IRQ is re-enabled. As soon as IRQ has been turned on again using EI, the 
interrupt present is detected and the interrupt output goes high again. 


The interrupt signal is generated at pin 32 (10) by programmable divider 
logic in the GA. This divider logic is supplied with the CRTC signal HSYNC 
and divides the applied frequency by 52. As the HSYNC pulse occurs 
approximately every 65 microseconds, the time between two interrupt pulses 
is 3.3 milliseconds. Here, the pulses are coupled with the CRTC VSYNC 
signal. The width of the VSYNC signal is programmed in the CRTC to 
approximately 500 microseconds. After about 125 microseconds, the 
interrupt occurs and the interrupt routine thus continues for approximately 
375 microseconds more checking port bit 0 of the 8255 port B for the 
presence of a VSYNC-. This signal is used as a timer in certain operations. 


However, this only occurs every fifteenth interrupt; in the case of the other 
14 interrogations, VSYNC is high and the internal counter is not affected. 


The HSYNC and VSYNC signals are naturally required, together with the 


DISPEN signal, to generate the video signal. The association of these signals 
gives the SYNC* signal at pin 5 (11) of the GA. 
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1.3.1.1 Pin Assignments of the Gate Array 40007 & 40008 
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1.3.1.2 Pin Assignments of the Gate Array 40010 
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1.3.2 Register Set-Up of the Gate Array 


To be able to carry out all the tasks described, data has to be stored in the 
GA. The exact number of internal registers is not known, but we can 
describe what are presumably the most important ones. 


Like all other components of the CPC, the GA is addressed via port 
addressing. The address occupied is $7FFXX. The result is that address bit 
A15 must be low and address bit A14 high. The remaining address bits (A12 
to A8) must be set (to high level) as the other peripheral units are decoded in 
a similarly incomplete way. The selection inputs for these units are also 
associated only with individual address bits. The state of the lower address 
byte is irrelevant for decoding; it can have any value. 


In all, three different registers can be differentiated. The first two registers 
are associated with colour generation or, more precisely, with the colour 
allocations determined by PEN and INK. The first register is loaded with the 
address to which a colour value is to be written. We shall refer to it from 
now on as the colour number register (CN-Reg). The actual colour value can 
then be written into the second register (using the same port address!). We 
shall call this register the colour value register (CV-Reg). 


The third register is a multi-function register (MF-Reg) and determines the 
monitor mode and the storage configuration. Here, a number of different 
functions are determined by the individual bits within the register. 


All the registers of the GA are input. It is NOT possible to read out values. 


As the GA can only be addressed via a single port address, there has to be a 
way of differentiating between the different groups. This decision is made by 
the highest order two bits of the data byte. The possible combinations are as 
follows: 


Bit 7 Bit6 

0 0 Write value to CN-Reg 

0 1 Write colour value to selected CV-Reg 
1 0 Write value to MF-Reg 

1 1 Spare? 


But what do the colour number and colour value registers actually do? 
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Essentially, these two registers are analogous to the BASIC commands PEN 
and INK. As we know, the PEN command is used to alter the current 
printing colour on the monitor. A PEN number can be allocated to a colour 
using the INK command. For this purpose, the number to be altered and the 
desired colour value are entered. It is precisely these functions that are 
performed by the two registers. The number of the colour to be altered is 
entered in the CN register, after which the desired colour value can be 
written into the GA. 

For example, to alter the colour corresponding to PEN 1, the sequence is as 
follows: 


OUT $7F00,$X00000001: OUT $7F00,$X010XXXXX 


In the first OUT command, bits 6 and 7 = 0. The number of the colour to be 
altered is specified in bits 0 to 3. In our example, the number is 1. Bit 5 has 
no function, while bit 4 has a special significance which we shall discuss 
presently. 


In the second OUT command, the values chosen for bits 6 and 7 are such that 
the CV register is selected. The bits identified by "X" determine the colour 
value. Although 32 different colours are possible with 5 bits, only 27 of these 
colours are generated. The remaining 5 are identical with other colours. 


When you try out this program in BASIC, you will see that the results are not 
all that good. A brief flash of the new colour is all you get. 


The reason for this is one of the peculiarities of the CPC's software. 
Basically, all the colours are displayed in "flashes". However, this is not 
noticeable as the flashing is not between different colours but between 
identical colours. At each colour change, all the parameters are reloaded for 
the GA. However, if you set the "SPEED INK 255,255" command before the 
OUT commands, you can observe the effects for a considerably longer time, 
at least in certain experiments. 


Now for an explanation of bit 4 in the CN register. If this bit is set when the 
register is accessed, the information contained in bits 0 to 3 is ignored and 
the colour value transmitted in the next OUT command will be interpreted as 
anew frame colour. 


The MF register is addressed if bit 7 is set and bit 6 is low in the OUT 
command. The meanings of the other bits in this register are as follows: 
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Bit 5 : Does this bit have no function? 

Bit 4 : 1 = disable VSYNC counter 

Bit 3 : 1 = turn off ROM &C000 to & FFFF 
Bit 2 : 1 = turn off ROM &0000 to &3FFF 
Bit 1 : monitor mode 

Bit 0 : monitor mode 


Up to now, it has been impossible to find out anything about the way in which 
bit 5 functions. 


If bit 4 is set, the divider chain for the interrupt pulse is disabled and the 
VSYNC pulse counting process starts over again. In this way, the time 
interval between two interrupt pulses could be lengthened. In BASIC, you 
can see how this works using the following little program loop: 


10 OUT $7F00,$X10010110:GOTO 10 


After the start of the program line, the computer is completely blocked. It is 
not even possible to reset via SHIFT/CTRL/ESC. With this one-liner, the 
tally register is disabled so quickly that no more interrupts can occur. As the 
keyboard is processed by an interrupt, the only thing you can do is switch the 
CPC off and on again to restore it to service. 


Bits 2 and 3 determine the current memory configuration. If one of the bits 
is set, when the processor read-accesses the specified address ranges, it will 
read from the RAM; if the bits are reset, the processor will read the data 
from the ROM. If these two bits are manipulated at random, the result will 
be at least an error message, but system crashes or resets are just as likely. 


The remaining bits, 0 and 1, determine the current monitor mode. The 
possible combinations are as follows: 


Bit 1 Bit 0 

0 0 Mode 0, 20 characters/line, 16 colours 
0 1 Mode 1, 40 characters/line, 4 colours 
1 0 Mode 2, 80 characters/line, 2 colours 
1 1 As for mode 0, but without flashing. 
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If you have tried out the one-line instruction to turn off interrupt mode 1, 
you will have noticed a remarkable change in the characters on the screen. In 
this example, we have chosen the 80-character monitor mode and have 
switched over without blanking the screen. Each of the characters displayed 
looks as if it has dots missing from the middle. You will find an explanation 
for this phenomenon in connection with the following chapter which 
describes the set- up of the monitor and the character display. 
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1.4 Video-Controller HD 6845 


Most of the work involved in generating the picture on the monitor is 
performed by the HD 6845 video controller, also known as a Cathode Ray 
Tube Controller, or CRTC for short. This IC has been specially designed as 
an interface between microprocessors and raster display screens such as 
conventional monitors. From a single timing pulse, it generates all the sync 
signals required for the monitor, thus permitting broad programming scope 
for all the parameters needed. 


Before describing the pins and the internal register set-up, let us take a quick 
look at the possibilities that this interesting component can offer. 


Programmable number of characters per line 
Programmable number of lines per screen 
Programmable vertical dot matrix for characters 
Access to a 16K storage area 

Automatic refresh when using dynamic RAM's 
Cursor control functions 

Programmable cursor (height and flashing) 
Light pen input 

Single 5V operating voltage 

TTL-compatible inputs and outputs. 


Originally, the 6845 was developed by MOTOROLA for use in computer 
systems with the 68xx processor family. Owing to its extraordinary 
flexibility and easy handling, however, this controller is now to be found in 
many systems. This IC is even used, for example, in such powerful systems 
as the Sirius and IBM PC. 
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1.4.1 CRTC Pin Descriptions 


The functions of the 40 pins are as follows: 


MA0-13 : Memory Address Lines , the storage locations of the picture 
memory are addressed via these 14 pins. 


RAO-4 : Raster Address Lines , these 5 pins are used to select the 
current raster line of the character to be displayed from the character 
generator. 


D0-7 : Bidirectional Data Bus , these pins are used to write data to the 
controller and read data from it. 


R/W* : Read/Write* , this signal determines the direction of data flow 
along the data lines. When it is low, data can be written from the processor to 
the CRTC and when it is high, it is read from the CRTC. 


CS* : Chip Select* , has to be addressed to permit data transfer with the 
6845. This is produced by a low at the CS* input. 


RS : Register Select , this signal is required in order to choose between 
the address register and the 18 control registers. When there is a low at the 
RS, the address register can be accessed, and, when there is a high, the 
control registers are accessed. 


EN : Enable , when the leading edge of this signal arrives, the processor 
signals present on the IC are accepted by the controller. 


RES* : Reset* , a low at this input resets all the counters in the CRTC and 
all the outputs go low. However, this function is performed only if the 
LPSTB input is low at the same time. The Reset does not reset the control 
registers! 


CLK : Character Clock is the clock signal that is divided up to provide all 
the signals required by the monitor. 


HSYNC : Horizontal Syne supplies the signal for horizontal 


synchronisation of the monitor. If HS is incorrectly adjusted or missing, the 
picture will "slip". 
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VSYNC : Vertical Sync supplies the signals that the monitor requires for 
vertical synchronisation. 


DISPTMG : Display Timing . This signal is high when the signal sent to 
the monitor is to be displayed on the screen. This signal can be used to 
suppress fly-backs. 


CUREN : Cursor Enable (often called Cursor Display, CURDISP) is 
used if the cursor is controlled not by the software but by the CRTC itself. 
The flashing of the cursor can also be controlled with this pin. 


LPSTB : Light Pen Strobe , if there is a low-high edge at this input, the 
current conditions of the MA lines are transferred to the light pen registers, 
where they are stored. These registers can be read out and used in an 
appropriate program. 
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1.4.1.1 Pin Assignments of CRTC HD 6845 
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1.4.2 Internal Registers of the Video Controller 


As already mentioned, the 6845 contains one address register and 18 control 
registers. As the RS, Register Select, signal only permits a choice between 
two addresses, the question arises of how all 18 control registers can be 
accessed via only one address. The solution to this problem lies with the 
address register. The number of the control register which we next wish to 
access is written to the address register. This may seem a somewhat 
complicated solution, but it does have an undoubted advantage. In this way, 
the CRTC occupies only two addresses, and not 18 or even 32. Furthermore, 
as the CRTC is usually programmed only once, when the machine is turned 
on, the extra programming involved is acceptable. 


Let us look at the 18 registers in a little more detail. The following 
description may seem somewhat dry and difficult to understand owing to the 
complex structure of individual registers. Some basic knowledge of video 
techniques will be needed in order to understand some of the registers. If you 
do not understand everything you read, you can console yourself with the 
knowledge that the video controller in your computer does not have to be 
programmed "by hand". 


In the following list, the letter R placed opposite a register name means that 
this register is a read register, while W means that it is possible to write to it. 
You should note that some registers can only be written to or read from 
(indicated by the use of a "-"). 


AR -/W : Address Register. This 5-bit register is loaded with the 
number of the required control register. Register values 18 to 31 are 
ignored; the current values are from 0 to 17. This register is accessed when 
both CR and RS are low. 


RO -/W : Horizontal Total. The number of characters per full line is 
entered in this 8-bit register. Of course, a full line is substantially longer than 
the one formed by the characters visible on the screen since allowance also 
has to be made for the edge and fly- back times. A value will therefore have 
to be selected that is about 1.5 times greater than the number of characters 
displayed. 


R1 -/W : Horizontal Displayed. This register contains the number of 


characters to be displayed on the screen. The value entered here must be less 
than for RO. 
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R2 -/W : Horizontal Sync Position. The 8-bit value of this register 
determines the time at which the HSYNC pulse occurs. If the value of R2 is 
reduced, the picture will shift to the right; if it is increased, the picture will 
shift to the left. 


R3 -/W : Sync Width. The width of the HSYNC and VSYNC pulses is 
defined by the lower 4 bits in this register. The upper 4 bits are not used. 


R4 -/W : Vertical Total. The lower 7 bits in this register determine the 
total number of raster lines per picture. This value also serves to decide 
whether a picture refresh frequency of 50 or 60Hz is to be selected. 


R5 -/W : Vertical Total Adjust. The lower 6 bits in this register can be 
used for the fine adjustment of the picture refresh frequency. 


R6 -/W : Vertical Displayed. The lower 7 bits in this register serve to 
determine the number of raster lines actually displayed on the monitor. 
Theoretically, any value can be programmed here, as long as it is less than 
(R4). 


R7 -/W : Vertical Syne Position. The 7-bit value of this register 
determines the time at which the VSYNC pulse occurs. If the value of R7 is 
reduced, the picture will shift downwards; if it is increased, it will shift 
upwards. 


R8 -/W : Interlace. The lower two bits in this register serve to determine 
whether or not the display is to make use of interlacing. 


R9 -/W : Maximum Raster Address. This 5-bit register determines the 
number of raster lines of the characters to be displayed. 


R10 -/W : Cursor Start Raster. Bits 0 to 4 of this register determine the 
raster line at which the cursor is to start. Bits 5 and 6 specify the cursor 
mode. The cursor mode is defined by the bits as follows: 
Bits 6 > 
0 0 Cursor not flashing 
0 1 Cursor not displayed 
1 0 Cursor flashing (approx. 3 times/s) 
1 1 Cursor flashing (approx. 1.5 times/s) 


R11 -/W : Cursor End Raster. As a function of (R10), the lower 5 bits 
of this register define the raster line at which the cursor is to end. 
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R12 R/W : Start Address High. Bits 0 to 5 specify from which address 
in the entire 16K address range of the CRTC the picture memory is to start. 
If this register is read, bits 6 and 7 are always low. 


R13 R/W : Start Address Low. This register, in a similar way to (R12), 
defines the low-order address byte of the monitor memory to be addressed. 


R14 R/W : Cursor High. Bits 0 to 5 in this register represent the high 
byte of the current cursor position. 


R15 R/W : Cursor Low. In the same way as with (R14), the low byte of 
the cursor address is stored in this register. As both R14 and R15 can be 
written to and read from, the cursor position can be determined at will via 
these registers. 


R16 R/- : After a positive-going strobe pulse, this register receives the high 
byte of the monitor memory address active at the time of the pulse. Bits 6 and 
7 of this register are always low. 


R17 R/- : In the same way as with R16, this register receives the low byte 
when the light pen strobe occurs. Both R16 and R17 are read-only. 
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1.5 The CPC RAM 


The write/read memory (RAM) built into the CPC is not just used as a data 
and program memory. It also contains the display screen data. 


Having discussed in detail the three most important components of the CPC, 
i.e. the processor, the gate array and the video controller in the preceding 
chapters, we shall now be taking a look at the way in which these three 
components interact when the memory IC's are accessed. We shall also 
explain how the video controller addresses the RAM in order to display 
characters on the screen. We shall also be giving a detailed description of the 
way in which the additional 64 Kbytes built into the CPC 6128 are addressed. 


Before doing so, we are going to digress briefly to see how the dynamic 
RAM components with their 8 address pins actually function. 


First of all, we shall have to explain how it is possible to address 65536 
memory cells with the 8 address lines available. The basic principle consists 
in dividing the 16-bit address into two halves and applying these two address 
bytes consecutively to the address pins of the RAM's. This method is known 
as multiplexing. Of course, multiplexing necessitates the use of control 
signals to tell the RAM's which information is currently on the address lines. 


This is where the RAS* and CAS* signals supplied by the gate array come 
into play. 


Once an address byte has been applied to the RAM's, they are informed by 
the RAS* signal going from high to low that a half- address is available. 
When the trailing edge (high-to-low) change of the RAS* arrives, the 
address information present is stored in the RAM's. 


The second half of the address can now be applied to the RAM. As soon as 
this address byte is available, the CAS* signal goes low. The RAM will then 
have received the full 16-bit address and selects the required memory cell. 
This cell can now be written to or read from. 


Of course, a suitable signal is needed in order to switch over the address 
halves; the one used by the CPC is CAS-ADDR*. The functions of 
"change-over switch" or multiplexer (they both mean the same, but 
multiplexer sounds much more professional) are performed by four IC's of 
the 74LS153 type. The best way of visualising the way in which these IC's 
function is to think of them as two electronically operated rotary switches. 
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Each of the two switches has four inputs and one output. Two control inputs 
can be used to decide which of the four inputs is to be connected to the 
output. 


The two control inputs are driven by signals CPU-ADDR* and CAS- 
ADDR*. Signal CPU-ADDR* serves to decide whether the processor or the 
CRTC is to be able to apply an address to the RAM; signal CAS-ADDR* 
makes the switch-over between the respective address halves. 


The following table shows the precise allocation of the processor and Video 
Controller address pins. 


Z80 6845 Z80 6845 


AO CCLK A8 MA7 
Al MAO AQ MA8 
A2 MA1_ A10 MA9 
A3 MA2_ All RAO 
A4 MA3 A112 RAI 
AS MA4 A113 RA2 
A6 MAS NAI14 MAI12 
AT MA6 NAI5S MAI13 


As we can see, all the processor's address bits are applied via the 
multiplexers to the address pins of the RAM's. Of course, in the case of the 
CPC 6128, address signals Al4 and A15 are not applied directly to the 
multiplexers. Here, the component is interposed for memory switch-over. 
But the Video Controller also addresses the entire 64K storage area with the 
help of the CCLK. However, this contradicts what was said in the preceding 
chapter, i.e. that the CRTC could only address an area of 16K. 


This is true insofar as only the 14 pins identified by MA (Memory Address 
Line) are counted as Address Lines. These 14 pins enable an address range of 
16K to be accessed. 


The 6845 operating mode employed in the CPC to address the video memory 
is not very often used. Usually, pins RAO to RA4 control a fixed-program 
symbol or character ROM which contains the bit pattern for the characters to 
be displayed on the screen. 


As arule, computers have a storage area known as a video RAM in which the 
characters to be displayed on the screen are stored. In this memory, each 
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character position takes up one byte. If, for example, 80 x 25 characters are 
to be displayed, 2000 bytes of storage capacity will be required. 


Now, one byte cannot accommodate all the information required for the 
display. Each character consists, in fact, of several rows of dots placed one 
beneath the other. 


We can also see these rows on the monitor of the CPC. The cursor, for 
example, consists of 8 superposed rows in which all the picture dots are "on". 
When letters or figures are displayed, only certain dots required to display 
the characters are "on" in a row. These dot patterns are stored using bit 
patterns, with one set bit usually corresponding to one dot on the screen. 


Now, the RA pins are needed in order to obtain the individual rows, that is to 
say bit pattern, from the character ROM. For this purpose, the RA pins are 
used as address lines for the character ROM. 


As you can imagine, it is not possible to generate high resolution graphics on 
the screen using fixed-program character ROM's. Computers designed 
according to this principle are limited to the built-in character repertoire. 


The CPC dispenses with this conventional type of character ROM; here, a 
completely different solution has been adopted. 


As the RA pins address the memory directly, the dot information also has to 
be accommodated in the RAM. Only by using this switch-over trick is it 
possible to generate any desired bit pattern on the monitor or, shall we say, 
to display graphics within the known limits. 


But before discussing in detail the way in which the video memory is set up, 
we must, at last, explain the CCLK signal. However, this will involve just a 
little bit of mathematics. 


The CRTC is operated at a clock rate of 1MHz. At every clock pulse, a 
memory cell is addressed. This cell contains bit-coded information on which 
dots are to be "on" on the display screen, i.e. which are to be displayed in the 
print colour. As a frequency of 1MHz corresponds to a cycle duration of 1 
microsecond, precisely one eighth of the clock rate is available to display 
each dot. This represents 0.125 microseconds. Hence, 80 microseconds will 
be required in order to display all 640 dots on a line. 


As, however, the VSYNC signal that determines the duration of a line has a 
cycle period of 52 microseconds, this arithmetic does not work out. With 
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these values, only a maximum of 40 characters can be displayed. 


One way out of this problem is to use a special RAM operating mode, the 
PAGE ADDRESS mode. Once the RAM has placed the contents of the 
required memory cell at the data outputs, after the RAS and CAS signals 
have been applied, it suffices, using one more CAS pulse, to apply only just 
one new address half to the RAM's to receive the next byte. Of course, this 
presupposes that only one half of the address information changes. 


This is precisely the feature that the CPC designers have exploited. Of 
course, the address information at the two CAS pulses must be different, 
otherwise the same cell would be read twice. But, this is where the CCLK 
signal comes in; it switches over precisely between two CAS pulses. This 
signal is applied by the multiplexer to address bit 0 (as viewed from the 
processor end) when the CAS-ADDR signal is low, but the CPU-ADDR 
signal is high. It thus represents the lowest-order address bit in the video 
RAM. 


The two bytes supplied in quick succession from the video RAM are 
temporarily stored in the gate array, converted into the serial form required 
for the monitor and supplied to the RGB output together with the colour 
information. 


This leaves the two signals MA12 and MA13. These two bits are used to 
determine the start of the video RAM in 16K steps. Usually, these bits are set 
and the video RAM thus starts at &C000. However, by suitable 
programming, it is also possible to have a video range from &4000 to 
&7FFF. 


1.5.1 The Additional 64K of the 6128 


It proved a little complicated working out the memory switch-over 
relationships in the case of the 6128. There was no way of getting over the 
problem with simple Peek's and Poke's. The only starting point was the 
‘BANKMAN' program supplied with the computer. However, as this 
program is protected for inexplicable reasons, things became a little more 
difficult. Be that as it may, after a certain amount of trial and error, it is now 
possible to describe at least the essential bases of memory switch-over. 


However, before describing this, two terms need clarifying. We use the term 
‘Bank’ for a storage area of 64 Kbytes; a ‘Block’, on the other hand, contains 
16 Kbytes. Both of these terms will be used frequently in the following 
section. 
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The memory is organised by a PAL component of the HAL16L8 type. Data 
lines DO to D2, as well as D6 and D7, address signals A1l4 and A15, the 
IOWR* signal and the CAS signal, as well as the reset and CPU* signals are 
applied to this component. The available outputs are signals NA14, NA15, 
CASO and CAS1. The PAL itself occupies port address &H7FXX, just as in 
the case of the Gate Array. As you will know from the description of the 
Gate Array, register selection in the GA is the result of the condition of data 
bits D6 and D7. The combination for which both data bits are 'one' (high) 
does not select a register in the GA. Instead, the information in data bits DO 
to D2 is evaluated in the PAL. The memory configuration is switched over 
via this information. 


After a RESET pulse, the computer acts as if it only has a bank of 64 Kbytes. 
The address signals, Al4 and A15, of the Z80 are applied unmodified to the 
address multiplexer via the PAL. The CAS signal of the GA is applied via the 
PAL to pin CASO. The CAS1 signal is inactive for the time being. The first 
bank in the CPC is then activated when the memory is accessed. Incidentally, 
the refresh is also provided for the second bank as only the RAS signal is 
needed for this purpose. This signal is applied in parallel to both banks. 


If, however, a suitable value is output to the PAL, the memory situation in 
the CPC changes considerably. But let us think which values these could be. 
The port address is clear in any case. Furthermore, we know that data bits 
D6 and D7 have to be set to avoid incorrectly addressing registers in the GA. 
Data bits D3 to DS are not interrogated as they are not associated with the 
PAL. The only possible values are thus clear: &CO to &C7. But what do they 
do? 


Unfortunately, owing to the make-up of the CPC, it is very difficult to work 
out all the combinations. In some cases, practically the whole memory is 
switched over. After the switch- over, however, the switch-over program 
also disappears. The result is a classical system crash. However, we can give 
you the combinations that you will find useful. With these values, the 
memory in the address range from &4000 to &7FFF in bank 0 is exchanged 
for a block in bank 1. The values required are given in the following table: 


&CO Bank 0, Block 1 Original condition 
&C4 Bank 1, Block 0 
&CS5 Bank 1, Block 1 
&C6 Bank 1, Block 2 
&C7 Bank 1, Block 3 
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If one of the values between &C4 and &C7 is output to port address &7FXX, 
the CASO signal becomes inactive in the &4000 to &7FFF range. The CAS1 
signal, on the other hand, becomes active. The information at address pins 
A14 and A15 of the Z80 is also modified by the PAL. One exception here is 
the value &C5, which addresses the same address range in the second bank. 
However, in the case of &C4, for example, the address range &0000 to 
&3FFF in the second bank is addressed without the processor "noticing" 
anything. For it, the RAM continues to be in the address range it wants. 
Value &C6 thus corresponds to the address range from &8000 to &BFFF, 
while &C7 corresponds to the address range from &C000 to &FFFF in the 
second bank. 


Unfortunately, it was not possible to determine the precise meanings of 
values &C1 to &C3. These values certainly play an important role in CP/M 
3.0 as a TPA of 61 Kbytes cannot be obtained with the other values. Of 
course, we are able to give those who are interested the memory map for 
CP/M 3.0. 


With this operating system, one has to "work" with three parallel RAM 
areas. Of course, you do not have to carry out any memory switch-overs 
yourself. The CP/M does it for you. 


In all three banks, the address range from &C000 to &FFFF is identical. 
This range is never itself switched over since it is via it that the other ranges 
are switched over. This is the address range in which the upper end of the 
TPA, as well as the permanently resident parts of the BIOS and BDOS, are 
located. 


However, there are still three more blocks in bank 0. The first block (&0000 
to &3FFF) contains the lower Jump Block which is copied to the lower RAM 
from the ROM after the CPC has been switched on. The video ROM is 
located in block 1 of bank 0 (&4000 to &7FFF). Finally, block 2 contains 
most of the BIOS and the BDOS, as well as the necessary jump blocks, which 
were, of course, an obstacle to expansion of the TPA with CP/M 2.2. 


Bank 2 consists of blocks 0 to 2 and contains the bulk of the TPA. The 
remaining part of the TPA is contained in block 3 of this bank. However, this 
block is the same for all three banks. 


In bank 2, finally, the range from &4000 to &7FFF is once again occupied. 
This range contains the CCP and the hash tables required by CP/M. 
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If you want to experiment with the memory switch-over values not explained 
in this chapter, you should find the following tips encouraging. First of all, 
you should move the monitor memory from &C000 to &4000. Then, you 
should place your test program in the now free range at &C000 and start. Of 
course, the best thing would be to have a little monitor program located in 
this range. The reason for this is that this range is probably never "switched 
out" as can happen with the other ranges. However, the monitor program 
must restore the memory configuration to its original condition, i.e. output 
the value &CO to the corresponding port address, before each call of system 
routines via the jump blocks. If you forget to switch back, you may find that 
the jump blocks are simply not there anymore as a result of your 
switch-over. In which case, your computer will come a cropper. 
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1.6 The Video RAM between the Z80 and the 6845 


Try this short program on the CPC: 


10 MODE 2 

20 FOR i= &c000 to &ffff 
30 POKE i,255 

40 NEXT i 


On the screen, you will get a thin line, quickly drawn from the top left-hand 
comer to the right. At the end of the first line, it is continued precisely 8 
rows lower. Once the screen is filled with these thin lines, the whole process 
starts all over again top left, but one dot row lower. 


Try the program in MODE 1 and MODE 0 too. 

Then, try altering line 30 to: 

30 POKE i,1 

Now, you will get dot rows that fill the screen vertically. 


If you have run the program in MODE 2, you will see that the vertical rows 
are on the right-hand sides of the characters. In MODE 1, we get two vertical 
rows per character, while, in MODE 0, there are as many as 4. 


Now, let us make one final change to the program. To do so, delete line 10 in 
the program and enter 'MODE 2' directly. The screen will be blanked and 
'"READY' will be displayed in the top left-hand corner. Press the 
Cursor-Down key (arrow pointing downwards) until the 'READY' message 
disappears from the screen. The cursor will now be on the bottom screen 
line. Now run the program once more. 


The results are somewhat irritating. 


This little program has yielded several important pieces of information. For 
one thing, we have demonstrated that the monitor memory starts at $C000 
and ends at $FFFF. Surprisingly, the position and size of the monitor 
memory are the same in all three modes. Modes 0 and 2 are not, therefore, 
different. Only the colours generated differ. 
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Of course, a 16K monitor memory in Mode 0, i.e. at 20 characters per line, 
seems to make little sense; 20 characters multiplied by 25 lines make only 
500 characters on the screen. Why does the CPC apparently need 16384 
storage locations in order to display these 500 characters? 


The answer is quite simple. As already mentioned, the CPC does not have a 
video RAM in which one character is stored in one byte. In 80-character 
mode, one character on the screen occupies 8 bytes; 40-character mode 
requires 16 bytes and the 20-character mode needs a total of 32 bytes. This 
can be seen from the program that was used to generate the vertical lines. 
Our illustration, 1.6.0.1, once more explains the composition of a character. 
Here, the character in Mode 2 should be in the top left-hand corner of the 
screen. 


The 80-character Mode is the simplest to understand in this respect as one set 
bit generates one dot in the current character (pen) colour. If, on the other 
hand, a bit is not set, the background colour appears at this point on the 
screen. As only one character colour can be obtained in Mode 2, there are no 
further possibilities. 


But why does one character require 32 bytes in Mode 0? 


These relationships are not as easy to describe for Modes 0 and 1. What you 
should do is type in the following small program so that you can see the 
results displayed for yourself. This will certainly make the descriptions 
easier to understand than pure "dry theory". 


10 MODE 2 

20 REM 

30 PRINT "A" 

40 FOR address=&C000 TO &F800 STEP &800 

50 p$=BIN$(PEEK (address),8) 

60 FOR I=1 TO 8 

70 IF MID$(p$,I,1)="1" THEN PRINT "X";ELSE PRINT "."; 80 NEXT I 
90 PRINT 

100 NEXT address 


If you run this program as described, you will get a picture that is the same as 
the printed matrix of "A". 


Now, change the Mode command at line 10 to "MODE 1" and run the 


program. You will find the results somewhat perplexing. It was to be 
expected that only half the matrix would be found in the byte read out. But 
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the fact that this matrix only requires half a byte, i.e. bits 4 to 7, is at first 
bewildering. 


However, we shall get nearer to answering the riddle if you replace line 20 
by: 


20 PEN 2 


In addition to the print (PEN) colour, the bit pattern displayed by our 
program has also changed. And that is the solution to our problem! 


If you are already fairly familiar with the CPC, you will know that it is 
possible to have 4 colours in the 40-character mode. These four colours can 
simply be stored with the character itself, in which only four bits are 
required for the pixel set, and Low and High Nibble (on nibble = half a byte, 
4bits) decide the colours. According to the principle used, the gate array 
needs only to double the pixels for the display in the horizontal direction in 
order to display 8 dots where only four have been stored. 


In Mode 0 with a 20 character per line display, this method is further 
extended. Here, only two bits contain the pixel information. The positions of 
the two pixels within the byte determine the colour in which this pixel is to be 
displayed. In this way, there is a total of 16 possible combinations, which is 
precisely the number of colours available. As only two pixels are stored in 
one byte, 4 bytes are required for one pixel line, i.e. a total of 8x4=32 bytes 
for one character in 16 different possible colours. 


Now try the program in Mode 0 using different values for the PEN 
command. You will quickly understand the principle. 


This clears up the first two points at the beginning of the chapter. What still 
remains unclear is the "shifting" of the display screen RAM. The answer lies 
in the hardware of the CPC. 


Even a Z80 with a clock rate of 4MHz takes some time to move a 16K data 
block. To avoid having to shift the entire video RAM range 640 storage 
locations for each new line, for example when listing a long BASIC 
program, a special feature of the CRTC has been exploited. By suitably 
programming registers 12 and 13 of 6845, the screen can start at practically 
any even memory cell in the video RAM. This can make scrolling much 
faster as only the corresponding registers need to be supplied with the 
required values. The new line at the bottom edge of the screen is quickly 
deleted and provided with the characters. 
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It is not possible for the video RAM to start at an odd address, i.e. for 
example at &CO001, due to the use of the CCLK signal as an address bit, as 
already described. 


The following program shows that it is also possible to manipulate the 
above-mentioned registers using BASIC: 


10 adreg = &bc00 : REM Address register of the 6845 
20 datreg = &bd00 : REM Port of the data register 

30 OUT adrreg,13 : REM Select register 

40 FOR offset = 1 TO 40 

50 OUT datreg, offset : REM alter 40 times 

60 FOR wait = 1 TO 40: REM and wait a little 

70 NEXT wait, offset 


In this program, the contents of the screen are scrolled horizontally. Without 
the Wait loop, scrolling would take place so quickly that it would not be 
possible to follow it with the naked eye. 


Vertical scrolling can also be programmed using BASIC. Of course, in this 
case, both registers, low and high byte, must be manipulated. However, as 
there is a considerable time lapse between the two OUT commands, this leads 
to unwanted flicker. 


There is one more special feature of the video RAM to be examined. 


Let us quickly calculate the memory required. In Mode 2, one character 
consists of 8 bytes. On one line, there is room for 80 characters and it is 
possible to have 25 lines on the screen. This gives a total storage requirement 
of 80x25x8=16000 bytes. But a 16K storage area has 2 to the power of 14 = 
16384 storage locations. Where are the missing 384 bytes? Quite simple. 
They are not required. At least, as long as the screen is not scrolled. Here, it 
is possible to store values temporarily, but they will certainly disappear 
when the next CLS occurs. 


You will certainly be wondering by now how it can ever be possible to 
program decent graphics with a monitor memory organised in such a way. It 
would seem to be difficult to read a character off the screen. With other 
computers, there is no problem: POKE can be used to place a character on 
the screen. In a similar way, the contents of the video RAM can be read out 
using PEEK. Furthermore, one can usually be sure that the video RAM will 
Start at a given address. 
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But things aren't as bad as they would seem at first glance. The operating 
system is, of course, capable of coping with the changing start addresses or, 
for example, of defining a character from the screen matrix, which is what 
happens whenever the COPY key is used. The required routines can also be 
used by home-made machine language programs. You will be coming across 
many of these operating system routines in a later chapter. We shall be 
showing you a concrete example of how to use the graphics to draw 
rectangles, as well as a program to generate a graphics hard copy. 
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1.7 8255, The Parallel Interface Component 


The 8255, which was originally developed by INTEL for the 8080 is also 
suitable for other processors as a programmable multi- purpose I/O 
component (I/O=Input/Output). The 8255 has a total of 25 lines via which 
the signals can be output or input. Groups of 8 lines each go to form 8-bit 
ports, and the third port can be divided into two separately programmable 
halves. 


The most important characteristics of the 8255 are as follows: 


24 programmable I/O pins 

Single 5V operating voltage 

Fully TTL-compatible 

Three high-performance programmable operating modes, 
each port independently programmable 

A high output current of ImA at a voltage of 1.5V 

Bit set/bit reset function available. 


1.7.1 8255 Pin Descriptions 


The pin assignments of the 8255 are shown in the following figure and have 
the following meanings: 


DO - D7 : Data Lines . These pins are linked up to the processor's data 
bus. They are used to transfer data to and from the processor. 


CS : Chip Select . The component is selected when a low is present at this 
pin. The signals now present at the RD, WR and data lines are accepted by the 
8255. 


RD : Read . A low at this pin causes the 8255 to send data or status in- 
formation to the processor via the data bus. 


WR : Write goes low if the processor wishes to send data or control 
commands to the 8255. 


A0,A1 : Address lines 0 and 1. A choice is made via these pins between 


the three data channels and the control register. These pins are frequently 
associated with the lower two address lines of the processor. 
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RESET : A high at this input resets all the registers, including the control 
register. The port lines are set to the entry mode. 


PAO-PA7 : Port A . These eight lines form I/O port A and can be used 
optionally as an input or output. 


PBO-PB7 : Port B . Same function as port A. 


PC0-PC7 : Port C . Same function as port A. 
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1.7.1.1 Pin Assignments of Parallel Port 8255 








PA 3 (1) O PaA4 
PA2 () O PAS 
PA1 () ‘) PAG6 
PAO () () PAT 
RD* () —) WR* 
cs* (©) () RESET 
GND () 1) Do 
Al (© O pD1 
AO O D2 
PC7 © O D3 
PC6 () j)pa4 
PC5 () 1 ps 
pc 4 () () D6 
PCO (_ O vd? 
PC1 (0) () Vee 
PC2 () 7 PB7 
PC3 () () PB6 
PBO () ‘) PBS 
PB1 (_  PBa 
PB2 (_ ) PB3 
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1.7.2 8255 Operating Modes 


Before discussing the four internal registers, we must first take a closer look 
at what this IC can do. As already explained at the beginning, the 8255 has 
three possible operating modes: 


Mode 0 : Simple input/output 
Mode 1 : Keyed input/output 
Mode 2 : Bidirectional bus 


Mode 0 is the simplest mode and also the one most frequently used. It can be 
used to determine whether the ports are to function as output or input lines. 
If the lines are programmed for output and data is applied to these outputs by 
the processor, the value is stored and the outputs are maintained until re- 
programmed or reset. When read, ports programmed as inputs give the 
current status on these lines. 


Both port A and port B can only be programmed for the desired data flow 
direction as complete ports. Therefore, port bits PAO, PA3 and PA7, for 
example, cannot be programmed as outputs while using the remaining pins as 
inputs. Port C can, of course, be divided into two halves. The direction of 
data flow for each half can be programmed separately. 


Mode 1 differs essentially from Mode 0. Here, it is possible to have data 
transfer with handshake signals in one direction. Now, we shall now cease 
referring to three ports, as the two halves of port C are made available to the 
other two ports for control and acknowledge signals. Instead, we shall talk of 
two groups: A and B. 


Group A consists of port A and bits 4-7 of port C, while group B similarly 
consists of port B and bits 0-3 of port C. 

To make it convenient to program Mode 1, a special bit of the corresponding 
half of port B can be used as an Interrupt signal. An 8-bit data transfer 
system of this kind can be used, for example, at printer interfaces. In this 
case, a signal is used to indicate that the data on the data lines is valid. A 
signal is sent back to indicate whether the receiver, i.e. the printer in this 
example, is ready to receive or whether the data has been correctly received. 
This function can be performed by the 8255, as required, to provide both a 
data output and an input. 


The third mode (Mode 2) is keyed bidirectional mode. This function can 
only be used with port A. Bits PC 3-7 are used as control and acknowledge 
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signals. One possible use of this mode would be to control a floppy disk drive 
since the data in this case must, of course, be sent both to the floppy disk and 
from it to the processor via these pins. 


Furthermore, it is possible, in all three operating modes, to use commands to 
deliberately set or reset the port bits programmed for output. 


All these modes described can also be combined. For instance, port A can be 
programmed in Mode 0 as an output, port B in Mode 1 as an input and the 
remaining bits of port C as an output. 


1.7.3 8255 Control, Description of the Register 


When we look at this bewildering number of possibilities and combinations, 
we cannot help wondering how they can all be programmed using just one 
control register. 


The method used to achieve this is quite simple. The highest-order bit of the 
control word is used as a flag bit. If this bit is set in the control word, bits 0 to 
6 assume the following meanings: 


Bit 0 : Controls Port C function, bits 0 - 3 
1 = input 
0 = output 


Bit 1 : Controls Port B function 
1 = input 
0 = output 


Bit 2 : Selects Group B mode 
1 = Mode 0 
0 = Mode 1 


Bit 3 : Controls Port C function, bits 4 - 7 
1 = input 
0 = output 


Bit 4 : Controls Port A function 


1 = input 
0 = output 
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Bits 6,5 : Select Group A Mode 
00 = Mode 0 

01 = Mode 1 

1x = Mode 2, bit 5 irrelevant 


If, on the other hand, the highest-order bit in the control word is reset, the 
"bit set/bit reset" function of port C is defined by bits 0-3. These bits then 
have the following meanings: 


Bit 0 : Controls Bit Set/Bit Reset 
1 =Bit Set 
0 = Bit Reset 


Bits 3-1 : Bit selection 
000 = PCO 
001 =PC1 
010 = PC2 
011 = PC3 
100 = PC4 
101 = PC5 
110 =PC6 
111 =PC7 


Bits 4 to 6 in the control word are irrelevant if the seventh bit is reset. 


It is only possible to give a description of this control register. The values 
cannot be read. But the registers corresponding to the ports can, even if the 
ports are defined as outputs. In this case, the read value corresponds to the 
condition of the port lines. 


The four registers are accessed via pins AO and A1. These pins are decoded 
in the 8255 and used as register selection signals. Usually, pins AO and Al of 
the 8255 are located on the processor's address lines of the same names. This 
gives sequential addressing via 4 addresses. 


The following table shows the way in which pins AO and A1 are allocated to 
the registers. 


Al AO 

0 0 ‘Port A register 
0 1 ‘Port B register 
1 0 Port C register 
1 1 Control register 
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1.7.4 How the 8255 is used in the CPC 


Now that we have taken a general look at the many possibilities of the 8255, 
we shall study the practical details of how this universal interface component 
works in the CPC. Like almost all the IC's in the CPC 464, optimum use is 
made of the 8255. Not a single bit is wasted. 


The 8255 operates the keyboard, the sound chip, the motor of the cassette 
recorder, generates the record signals of the recorder, reads the bit stream 
arriving from the recorder, tests the VSYNC signal of the CRTC, makes 
sure that the printer is ready to receive, uses one bit to detect the condition of 
the EXP signal of the expansion connector, uses a jumper to decide whether 
the picture is to be generated using the PAL or SECAM standard at 50 or 
60Hz and, after all this, there are still three whole bits left over to indicate 
jumper positions at power on and find out which computer you have. It is the 
condition of these switches that decides, in fact, whether you will get 
Schneider, Awa, Triumpf, Amstrad or one of the other eight different 
possible brand names displayed on the screen at power-up. 


The fact that all these functions can be achieved with the 24 I/O lines 
available bears witness to the thrift and shrewdness of the hardware 
designers. 


A glance at the circuit diagram will show you how the 8255 is connected. 
The data bus is linked up directly with the data bus of the processor. The CS 
signal (Chip Select) is generated by the processor's address bit Al1. Pins AO 
and A1 of the 8255 that are available for register selection are linked up to 
processor address pins A8 and A9. 


As already mentioned, all the peripheral units in the CPC are addressed via 
port addresses. This is why the RD* line of the 8255 is associated with the 
IORD* signals. 


This signal is generated by the association of Z80 signals RD* and IORQ* 
with one of the gates of IC112. Only if IORQ* and RD* are low will a low 
occur at output pin 6 of IC74LS32. 


The WR* pin of the 8255 is also controlled in the same way. Here, a low 


occurs, from pin 3 of the 74LS32 if both WR* and IORQ* of the Z80 go low 
at pins 1 and 2 of IC112. 
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This data can then be used to define the port addresses of the 8255. For 
instance, in order to write a value to register 0, the data register of port A, 
pins All, A9 and A8 must be low. Expressed in binary notation, we obtain 
the following values for the high byte of the address bus: 


Al5 Al4 A13 Al2 All Al10 AO09 A08 
1 1 1 1 0 1 0 0 


Which corresponds, in hexadecimal notation, to &F4. 


The lower 8 address bits are not involved in the selection of the 8255; here, 
any value between &00 and &FF is possible. The set bits in the high byte are 
not actually required, either, for the purpose of correctly addressing the 
8255 and we might, therefore, think of using the value 00H as a high byte. 
This method would work. However, as the individual peripheral IC's are 
decoded in a similarly incomplete way, the bits have to be set the same as 
other IC's, such as the CRTC or the gate array, would also act as if addressed 
at the same time. 


However, to return to our example, to load a value into register A, then, the 
value &F400 must be placed on the address bus. This can be achieved using 
the following commands: 


LD A,value 
LD BC,&F400 
OUT (C),A 


In the same way, port register C, for example, can be read using the 
following commands: 


LD BC,&F600 
IN A,(C) 


Basically, all three ports are used in the 0 Mode. As a result, all 24 pins are 
available as I/O lines. 


Port A (&F400) is associated with the 8 data lines of sound generator 
AY-3-8912. Depending on the action required, port A can be programmed 
as an output or input. When programmed for output, the control commands 
are sent to the sound chip via the 8 port lines. You will find these control 
commands in the chapter on how to program the AY-3-8912. We will 
mention in passing that the sound chip is also provided with a bidirectional 
8-bit port. One side of the keyboard matrix is connected to this port. Via port 
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A of the 8255, by way of the AY-3-8912 port, it is possible to establish 
whether or not a key is depressed. For this purpose, port A must, of course, 
be programmed as an input. 


Port B (&F500) is permanently programmed as an input port. All 
conditions, apart from the keyboard, are indicated via this port. The 
individual bits of this port are allocated as follows: 


Bit 0 : This bit indicates the condition of the CRTC VSYNC. As this 
operation has to go very quickly, bit 0 can be shifted into the Carry Flag, 
simply by rotating the value read with INP. In this way, the condition of 
VSYNC can be quickly established. 


Bits 1-3 : These bits decide the firm name in the power-up display. 


Bit 4 : This bit is associated with switch LK4. If this switch is open, the video 
controller is programmed for operation using the PAL system, at 50 Hz; if it 
is closed, the CRTC is programmed for SECAM with a picture refresh rate 
of 60Hz. These programming options are important if the CPC464 is to be 
operated, via module MP1, with a television set. 


Bit 5 : This bit interrogates the condition of the EXP signal of the expansion 
connector. 


Bit 6 : This bit indicates the condition of an associated printer. As the printer 
cannot receive characters at all times,there is a possibility of inhibiting 
character transfer by setting this pin high. 


Bit 7 : Via this bit, the data supplied from the recorder at TTL level is read 
in. The remarks about bit 0 apply here too. As this line has to be tested very 
quickly, its condition can be swiftly determined by rotating bit 7 into the 
carry flag. 


The remaining Port C (&F600) is permanently programmed in the CPC as 
an output port. With four of its eight lines, it controls one part of the 
keyboard enquiry process, and two other bits are used for the recorder. The 
remaining two bits are required to control the sound chip. As the lines of 
port C can be set and reset directly, this port is, of course, particularly suited 
to these tasks. Individually, the bits are used as follows: 


Bits 0-3 : These bits control the keyboard matrix. The four lines 


programmed for output are associated with IC101, which is a BCD decimal 
decoder. This decoder earths one of its ten outputs in accordance with the 
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binary input data. The values 0 to 9 can be used to form the permissible 
combinations. 


Bit 4 : This bit controls the motor of the cassette recorder. The motor is not, 
in fact, controlled directly but via a transistor (and a downstream connected 
relay). If this bit is earthed, the motor stops. If there is a high at the output of 
PB4, transistor Q101 conducts and the motor runs when the PLAY key is 
depressed. 


Bit 5 : Via this pin of the 8255, the audio frequencies are supplied by the 
computer to the recorder, which generates these remarkable tones on 
play-back. 


Bits 6-7 : These port bits are associated with pins BC1 and BDIR of the sound 
chip and function as Chip Select and strobe signals forthe AY-3-8912. You 
willfind a more detailed description of these pinsin the following chapter, 
which is devoted to the sound generator. 
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1.8 Programmable Sound Generator Ay-3-8912 


The AY-3-8912, a very good programmable sound generator (PSG), was 
developed by General Instruments to provide realistic sound effects for 
games since the first games produced, generated ineffectual noises. To make 
it as universal as possible, the PSB was equipped with numerous variable 
sound features. In addition, as was thought, when developing this IC, that it 
would probably be necessary to interface to keyboards, joysticks and 
switches in practically all applications, the PSG was also given a bidirectional 
8-bit parallel port. 


The charactersistics of this IC are as follows: 


Three independently programmable tone oscillators 
One programmable sound generator 

Fully software-controlled analog outputs 
Programmable tone and sound mixer 

15 logarithmically graded loudness levels 
Programmable envelope curves 

Bidirectional 8-bit data port 

TTL-compatible 

Single 5V operating voltage. 


The AY-3-8912 has a total of 16 registers, of which 15 registers can be used. 
All the sound possibilities of the chip can be programmed via these registers. 
The circuitry of the PSG can be subdivided into individual function blocks. 
First is the tone generator block. The tone generators are supplied with a 
timing pulse that is obtained from the clock signal divided by 16. These tone 
generators are responsible for generating the three square-wave 
audio-frequencies. 


The sound generator produces a frequency-modulated square-wave signal 
whose pulse width is varied by a pseudo sound generator. 


The mixers couple the output signals of the three generators with the sound 
signal. Coupling can be programmed separately for each channel. 


The amplitude control function block offers the user two possibilities. In the 
first place, the output amplitude (volume) of the three channels can be varied 
by programming the corresponding volume register. Alternatively, they can 
be varied by the PSG. In this case, the output of the envelope curve register is 
used to vary the volume. As the envelope curve can be programmed with 
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four separate parameters, there are numerous available ways of varying 
tone. 


The function block of the D/A converter is responsible for generating the 
volume of the output signals. As the volume and envelope information are in 
digital form, they are converted in the D/A converter. 


The last function block accommodates the two I/O ports. The AY-3-8912 
actually contains two complete I/O ports, only one of which, however, is 
brought out to the pins. 


1.8.1. Sound Chip Pin Descriptions 


As the names given to the pins of the PSG are not necessarily 
self-explanatory, their functions are described here in detail: 


DAO - 7 : These pins of the sound chip are linked with the processor's data 
bus. The prefix DA indicates that both data and (register) addresses are sent 
via these pins. 


A8 : This pin can be considered as a CHIP SELECT signal. It has to be high 
in order to address the register of the PSG. 


BDIR& 

BC1,2 : The BDIR signal (BUS DIRection) pin and pins BC1 and BC2 (bus 
control) control register access to the PSG. At first glance, the allocations 
shown in the table may appear somewhat strange. As, however, this IC was 
originally developed as a component for the 1610 processor, a special 16-bit 
processor made by General Instruments, the special features and control 
connexions of this processor were taken into account at the design stage. 


BDIR BC2 BC1_ PSG Functions 


0 0 0 INACTIVE 

0 0 1 LATCH ADDRESS 
0 1 0 INACTIVE 

0 1 1 READ FROM PSG 
1 0 0 LATCH ADDRESS 
1 0 1 INACTIVE 

1 1 0 WRITE TO PSG 

1 1 1 LATCH ADDRESS 
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1.8.1.1. Sound Chip AY-3-8912 





CHANNELC (1) O DAO 
TEST1 () O DA1 
Vee () () DA2 
CHANNELB () O DA3 
CHANNELA () O pa4 
Vss () (1) DAS 
I0A7 () O DA6 
IOA6 () O DA?7 
IOA5 () © sBe1 
10A 4 () © Bc2 
10A3 () © BDIR 
10A 2 () O as 
I0A1 () () +RESET* 
IOA 0 () ( cLocK 
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Only four out of eight combinations in this table are really useful. That is 
why BC2 is frequently set to +5V. The remainder of the table is only 
determined by signals BDIR and BC1, and it looks as follows: 


BDIR BC1 Function 


0 0 INACTIVE, the PSG data bus is high impedance. 

0 1 READ, data can be read from the PSG registers. 

1 0 WRITE, data can be written to the selected PSG 
register. 

1 1 LATCH, the number or address of the required PSG 
register is written to the PSG. 


ANALOG A : This is the output of Channel A. Here, the tones generated by 
Channel A can be accepted. The maximum voltage is 1 Vpp. 


ANALOG B : Same function as pin 1 for Channel B. 

ANALOG C : Same function as pin 1 for Channel C. 

IOA7 - 0: The IOA pins constitute the 8-bit port of the PSG. Depending on 
programming, the pins can function as outputs or inputs. When doing so, 
only one mode can be selected for the port as a whole. Combined operation 
(using some bits for inputs and others for outputs simultaneously) is not 
possible. 


CLOCK : All the audio frequencies are obtained by dividing the frequency 
of this signal. Its frequency should be between 1 and 2MHz. 


RESET : A low at this pin causes all the internal registers to be reset. 
Without a reset, the different registers would contain random values after 
switch-on and the results would be (probably) very unmusical. 


TEST1 : TEST1 is used only by the manufacturers and must not be wired 
up in operation. 


Vcc : The +5V operating voltage is applied to this pin. 


Vss : This is the earth connection of the PSG. 
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1.8.2 Functions of the Individual 8912 Registers 


As we now know how the registers can be addressed via pins BDIR and BC1, 
we shall look at the functions that the registers perform. The register 
number that is used below is the same as the number that has to be entered in 
the address register in order to access the desired register. 


Interestly, the address register preserves its contents up to the time of 
re-programming. It is thus possible to access a data register several times in 
succession without any problem, without having to re-load the address 
register each time. 


And now to describe the registers. 


Reg0,1 : These registers determine the cycle duration, hence the frequency, 
of the tone signal at ANALOG A. Not all 16 bits are used, however. All the 8 
bits of register 0 and the four lower-order bits of register 1 are employed. 
The frequency can be finely adjusted with register 0 and adjusted in broad 
steps using register 1. The smaller the 12-bit value of this register, the higher 
the tone. 


Reg2,3 : Same function as Reg 0,1, but channel B. 
Reg4,5 : Same function as Reg 0,1, but channel C. 


Reg6 : This register adjusts the sound generator with its lower 5 bits. Here 
too, the smaller the value in the register, the higher the sound frequency. 


Reg7 : In this multi-function register, individual bits control various 
functions. These are indicated in the following table. 


BitO : Switch on/off channel A tone O=on / 1=off 
Bit1 : Switch on/off channel B tone O=on/ 1=off 
Bit2 : Switch on/off channel C tone O=on/ 1=off 
Bit3 : Switch on/off channel A sound O=on/ 1=off 
Bit4 : Turn on/off channel B sound O=on/ 1=off 
BitS : Turn on/off channel C sound O=on / 1=off 
Bit6 : Port A as input/output O=input / 1=output 
Bit7 : Port B as input/output O=input / 1=output 


Reg8 : This register determines the volume of the signal on Channel A. The 
lower four bits are used for volume control. Bit 4 has a special meaning. If it 
is set, the volume is determined by the envelope register and the contents of 
bits 0 to 3 are then ignored. 
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1.8.2.1. PSG Envelopes 


REG. 15 


B3,B2,B1 BO 
A 


ROPAAYS 
ma>Zzamar- 
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Reg9 : Same as Reg 8 for Channel B. 
Reg10 : Same as Reg 8 for Channel C. 


Reg11,12: All the 16 bits in these registers affect the cycle duration of the 
envelope. The contents of Reg 11 are considered as a low byte, ie. they 
adjust the cycle duration in small steps, while Reg 12 is the high byte of the 
envelope generator. 


Reg13 : Bits 0 to 3 of this register determine the curve shape of the 
envelope generator. It is practically impossible to explain the method of 
allocation in words. The envelopes that can be generated are therefore shown 
in figure 1.8.2.1. 


1.8.3. Operation of the AY-3-8912 in the CPC 


In this section, we shall be discussing the specific connections and a number 
of more practical aspects concerning operation of the sound chip in the CPC. 
The above description of the registers was necessarily abstract and possibly 
not very easy to understand; after finishing this chapter, you will have a 
better understanding of certain specialities of the PSG. 


Let us first take a look at the circuit diagram. 
The PSG is identified as IC102. 


Pins 3, 17 and 19 are set to +5V. The AY-3-8912 receives its operating 
voltage via pin 3. As BC2 (pin9) and A8 (pin 17) are at +5V, they have no 
effect on register selection. 


The remaining register control lines BC1 (pin 1) and BDR (pin 18) are 
associated with port bits PC6 and PC7 of the 8255. Depending on the state of 
these connections, the PSG can be supplied with register addresses and data 
can be written to or read from the PSG. 


Actual address and data transfer takes place via PSG connections DO to D7 
which are associated with port A of the 8255. Depending on the action 
required, port A of the 8255 must be programmed as an input or output. 


The clock signal at pin 15 is a square-wave signal with a frequency of 1MHz. 
This signal is supplied by the gate array by dividing the quartz frequency. 
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All the tone and envelope frequencies are derived from this signal by 
frequency division. 


The I/O port of the PSG is associated with the keyboard and with the 
connection for the joystick. You will find a detailed description of the 
keyboard and joystick in one of the following chapters; here, we shall be 
concerned only with the acoustic possibilities of the sound chip. 


The most important connections at this IC are definitely the three analog 
outputs, A, B and C on pins 1, 4 and 5. These outputs take the form of 
so-called open emitter outputs. In order to be able to output a tone a.c. 
voltage, resisters are required that can be switched between output and earth. 
This function is performed by resistors R121, R122 and R123. The sound 
signal is mixed once by these resistors via the three resistors R114, R115 and 
R116 and is supplied as a mono signal to pin 1 of the expansion connector. 
This mono signal is then transmitted to connector CP001. From here, the 
signal reaches the internal amplifier and loudspeaker. In addition to this, the 
three outputs are connected to the stereo jack on the rear of the apparatus. 
The signal of Channel B is applied equally, via resistors R118/R119, to the 
two stereo channels. Outputs A and C are each directly applied via an earth 
neutralizing capacitor (R117 and R120) to one of the stereo channels. 


Using this type of switching, skilful programming can even achieve genuine 
stereo effects. It would be possible, for example, to output a tone at first only 
over Channel A. After a certain time, the same tone could also be output over 
Channel B. In doing so, the volume of the signal on Channel B could be 
gradually increased, the volume of the signal on Channel A being reduced 
accordingly. In this way, the tone would appear to come from one corner of 
the room into the centre point between the two loudspeaker boxes. From 
here, it can, if required, pass to the other corner. 


These effects can even be obtained in BASIC with the powerful SOUND 
command. However, the operating handbook is contradictory as regards the 
allocation of the three tone channels of the two stereo channels. Remember 
this when you connect your SPC to a stereo system. Only the sounds on 
Channel B occur on both channels of the stereo system. 


But how does the PSG actually generate the tones? Let us examine in detail 
what happens in one channel. 


As already mentioned, all the tones are derived from the clock signal at pin 


15. First of all, the clock signal is divided by 16. This gives the CPC a control 
frequency of 62.5KHz. This frequency is now transmitted to a 
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programmable frequency divider. Depending on the contents of the tone 
generator register, the control frequency is further divided in order to 
obtain the desired tone frequency. Here, the designers of the IC's have 
dipped very deep into their bags of tricks. The divider chain consists not only 
of flip-flops that can divide the frequency by two but, thanks to a special 
switching arrangement, even odd divider factors are possible. It is quite 
possible to divide the control frequency by three or 17. This is, indeed, 
precisely the way in which all the required values can be generated in the 
high frequency range. 


If you look in the annex to the CPC handbook, you will find a period value of 
27 for note D of the fourth octave. How is this value obtained? 


When we first asked ourselves this question, there was a tearing of hair and a 
wringing of hands. Just as we had thought, it was impossible to obtain a value 
that made any sense. After several hours of furious thought, only one 
possibility remained; the table in the CPC Handbook must be wrong. When 
the period is input in the SOUND command, it generates a frequency that is 
precisely one octave below that specified. By inputting "SOUND 1,284,100", 
you obtain, not the desired frequency of 440Hz, but precisely 220Hz! 


The formula for calculating the period should, in fact, be: 
PERIOD = ROUND (62500/FREQUENCY) 
The table seems to have been calculated on a control frequency of 2MHz. 


But let us examine tone generation in the PSG further. The contents of the 
tone generator register thus determine the divider factor for the tone signal. 
If register 0 of the PSG is loaded with the value 100, and register 1 with 
value 0, the control frequency is divided by 100. A signal with a frequency 
of 625Hz is supplied at the output of the Channel A divider chain. However, 
this signal cannot yet be taken from output A. For this purpose, the 
corresponding channel must first be switched on. This is done by resetting 
the corresponding bit in register 7. As, in our example, we have selected 
Channel A, we have to reset bit 0. When doing so, the states of the other bits 
have to be taken into account. In the case of the CPC, this means specifically 
that bit 6 must not be altered intentionally as, otherwise, the keyboard would 
be blocked. Even so, you will probably not hear any tone as the volume of 
the corresponding channel still remains to be adjusted. Register 8 is 
responsible for Channel A. A value of 1 will give a soft tone and a value of 
15 will give us maximum volume. 
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If we set bit 4 in the volume register, the information contained in bits 0 to 3 
is ignored. Registers 11, 12 and 13 now determine the volume. The volume 
is now no longer fixed at one value, but is variable. 


Let us look first at register 13. The official name of this register is the 
"ENVELOPE SHAPE/CYCLE CONTROL REGISTER". Its functions are 
best explained by means of a little example. After supplying registers 0, 1, 7 
and 8 with the corresponding values, we write the value 12 to register 13. 
Bits 2 and 3 are now set and the lower-order 2 bits are reset. The table in the 
register description shows, for this combination, a series of slowly rising, 
sharply falling "zig- zags". In practice, this means that the tone volume first 
slowly rises to maximum. The tone is then turned off and the volume 
increases again. This condition persists until a new command is sent to 
register 13. 


The volume rise time can be adjusted via registers 11 and 12. In the same 
way as the tone generator registers, these registers serve to adjust a further 
programmable divider chain in the PSG. The divider chain is supplied with a 
signal corresponding to the clock signal divided by 256. This gives a 
frequency of 3906.25Hz, corresponding to a cycle duration of approx- 
imately 250 microseconds. 


If a value of 1 is written to register 11 and a value of 0 to register 12, acting 
as the high byte, the tone volume will effectively be turned up from 0 to 
maximum volume in 250 microseconds. However, this is in the audible tone 
range and generates a distinct whistling tone that is superimposed over the 
tone actually wanted. For this reason, far larger register values are always 
selected. At maximum value (250 to registers 11 and 12), the rise time to full 
volume lasts for a total of 16.8 seconds. 


The CPC software does not use this means of adjusting volume via the 
envelope register. The ENV commmand varies the tone volume only 
through the manipulation of the lower four bits in the volume register. The 
ENT command of the CPC has no equivalent whatsoever in the PSG. This 
function is generated by skilfully modifying the tone generator register. 
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1.9 The Disk Drive in the CPC 664 and 6128 


By contrast with the 464, both the 664 and the 6128 have a disk drive 
interface and a disk drive built into the housing. Not only does this make the 
expansion slot on the rear more easily accessible to other peripherals without 
piggy- backing, but the working space required is also reduced. 


Basically, the circuits in all three computers are fully compatible as regards 
both functions and software. 


The Controller Board centres around the integrated Floppy Disk Controller 
(FDC) uPD 765. This IC is the interface between the disk drives and the 
processor of the CPC. While disk drives can, of course, be set up without 
using an FDC, the high “intrinsic intelligence" of the FDC considerably 
simplifies design. Not only hardware requirements but also the amount of 
operating software that has to be written is drastically reduced by means of 
an FDC. Here is an example to illustrate this. 


The 1541 disk drive made by Commodore, with which many of you will 
certainly be familiar as the disk drive for the Commodore C64, has been 
constructed without the use of an FDC. Apart from the structurally inherent 
low data transmission speed, the amount of hardware used in this drive is 
considerably higher than for the CPC Floppy Disk Drive. The digital 
electronics of the 1541 contains its own processor, two 40-pin peripheral 
IC's and any amount of different TTL IC's, enough components to make a 
complete CPC 664! 


The operating software needed for the 1541, approximately 16K, is twice as 
much as the AMSDOS required. No wonder developers (for reasons of 
convenience) and dealers (for cost reasons) go for the easy-to-use FDC's. 


The hardware of the controller amounts to a mere handful of components. It 
was only the high integration of three IC's that made it possible to arrive at 
such a small number of components. These IC's were the FTC, the Data 
Separator and the ROM with the AMSDOS. 


The 16 Kbyte AMSDOS ROM contains all the main routines needed to 


operate the disk drive in approximately 8 Kbytes. The remaining 8 Kbytes 
contain part of the CP/M 2.2 LOGO Interpreter supplied on diskette. 
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1.9.1 The FDC 765 


The FDC sold by NEC as the uPD 765, by ROCKWELL as the R 6765 and 
by INTEL as the 8765, can be considered as a highly specialised 
microprocessor. The capabilities of this IC are so numerous and complex 
that this description is certainly no exaggeration. 


The data format used by the FDC corresponds to IBM format 3740 in single 
density and IBM System 84 in double density. As a result, it is impossible, 
unfortunately, to read from or write to Commodore or Apple diskettes, for 
example. 


With its 40 pins, it provides all the signals needed to operate the standard disk 
drives sizes of 8", 5 1/4" and 3". Thanks to the control signals provided, the 
designer is able to associate this FDC with practically any processor. There 
are two basic solutions for connection and operation. The first method is that 
of DMA operation. Together with a DMA Controller, the FDC can take over 
control of the memory of the computer system for data transfer in read and 
write operations. In this case, with the help of the DMA Controller, it fetches 
new data from the memory or writes the values read off the disk into the 
memory, also bypassing the processor in this case. However, this very swift 
method of data transfer is not used in the CPC and has been described here 
simply for the record. 


In the second method, used in the CPC, data transfer is performed by the 
processor. However, two possible FDC operating methods have to be 
differentiated. 


The first would be the interrupt method. In this case, an interrupt is 
generated for every data transfer. In the corresponding interrupt routine of 
the processor, the next data or command byte then has to be supplied or read 
by the processor. Owing to the hardware design of the CPC, this method was 
probably not even considered. Consequently, the designers adopted the 
polling method. Here, the processor has to carry out regular checks in the 
registers of the FDC to see which is the next action that the FDC requires. 


But let us first take an overall look at the performance characteristics of the 


765. Do bear in mind, however, that the designers of the Controller Board 
have not exploited all the possibilities of the 765. 
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Programmable sector length 

All drive data programmable 

Possibility of connecting up to four disk drives 

Data transfer optionally in DMA or non-DMA mode 

Can be connected up to practically all common types of processor 
Simple 5V power supply 

Simple single-phase clock pulse of 4 or 8MHz 

40-pin IC housing. 


We shall be taking a somewhat closer look at the last point in this short list. 


1.9.2 Pin Descriptions of the FDC 


The pins of the FDC 765 can be divided into several groups. The first group 
of pins represents the interface to the system processor. The FDC is thus 
controlled from the processor via these pins. The second group is only 
required in association with DMA operations. The DMA controller and the 
FDC communicate using these signals. 


The interface to the floppy disk drives is provided by the third group which, 
with its 19 pins, is the largest of the groups. 


The fourth and last group includes the power supply and clock pulse 
connections. 


Let us begin our discussion of the pins with the first group, i.e. the interface 
to the processor. 


The Processor Interface 
RESET: 
The RESET pin of the FDC is active high. In normal operation, this pin is at 


earth potential. A high at the RESET pin places the FDC in a particular 
condition. 
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1.9.1.1 Pin Assignments of the FDC 765 
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CS*: CHIP SELECT 


A low at this pin causes the FDC to be selected. Only when CS*=low do RD* 
and WR* become valid for the FDC. As the designer is at liberty to generate 
the CS, it is optional whether the FDC is memory-mapped, i.e. as a part of 
the memory range, or accessed via port addresses. RD*: READ* 


This pin has to be associated with the RD* signal of the processor. Whenever 
the processor wishes the read data from the FDC, this line will be set low. 


WR*: WRITE* 


Just as the RD* line indicates read accessing by the processor, a low at pin 
WR* signals that the processor is writing data or commands to the FDC. 


A0: ADDRESS LINE 0 

The FDC has only two addresses that are accessible from the outside. The 
two addresses are differentiated by signal AO. This line is usually associated 
with the lowest-order address bit of the processor. 

DBO - DB7: DATABUS 0-7 

These pins of the FDC are associated with the system data bus. All commands 
and data are conveyed via these eight bidirectional connections. The actual 
direction of data flow is determined either by the processor or, in DMA 
mode, by the DMA Controller. 

INC: INTERRUPT 


The FDC can generate a system processor interrupt via this pin. Interrupts 
are generated at each byte transfer (not connected in the CPC). 


Signals for the DMA Mode (not used in the CPC) 
DRQ: DMA REQUEST 
Via this connection, the FDC advises the DMA controller that memory 


access is to take place. At the next possible opportunity, the DMA controller 
then takes over the system bus. The processor is deactivated in this case. 
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DACK*: DMA ACKNOWLEDGE 


This signal informs the FDC that the DMA Controller has taken over the bus 
and has now started data transfer. 


TC: TERMINAL COUNT 


A high at this pin causes data transfer from and to the FDC to be interrupted. 
Although this pin is used primarily in DMA mode, data transfer can also be 
interrupted via this pin in interrupt-driven systems. 


The Floppy Disk Interface 
US0, US1: UNIT SELECT 0/1 


Via these two pins, it is possible to connect up two and, with the help of a 
"two-to-four decoder", four disk drives. Via the pins, the desired disk drive 
is addressed for data reading or writing. 


HD: HEAD SELECT 


As the FDC is designed to operate dual-head disk drives, the head can be 
selected via this pin when these drives are used. 


HDL: HEAD LOAD 


This signal is used almost solely with 8" disk drives. The motors of these 
drives are not turned on as required but usually run continuously. To spare 
the diskette and the write- read head, the head is only "loaded" when 
required, i.e. applied to the diskette surface by means of a lifting magnet. 
The magnet is then controlled by means of HDL. 


IDX: INDEX 


This is the pin to which the signal generated by the index light barrier is 
applied and it informs the FDC of the physical start of a track. 


RDY: READY 


The READY signal supplied by the floppy disk indicates that there is a 
diskette in the disk drive and that it is rotating at a given minimum speed. It is 
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only when the READY signal has occurred that the SPC takes charge of the 
disk drive. 


WE: WRITE ENABLE 
This output of the FDC has to be high to be able to write data to the diskette. 
RW/SEEK: READ WRITE/SEEK 


In all, a floppy disk drive supplies more signals than are available for the 
floppy disk interface with a 40-pin housing. Of course, not all the signals are 
needed simultaneously at all times. Eight of these drive signals have thus 
been divided into two groups which can be applied optionally to four pins of 
the FDC. The FDC automatically selects the signals currently required via 
the RW/SEEK pin. 


FR/STP: FIT RESET/STEP 


This is the first of the four double signals on the FDC. The meanings of this 
output vary according to the operation performed. In one case, it can be used 
to reset the error flip-flop provided in certain disk drives. The second, and 
far more common application, is control of the disk drive step input. At 
every head change, the necessary pulses are supplied at this pin. 


FLT/TRO: FAULT/TRACK 0 


This input can also evaluate two different signals. If a SEEK operation (see 
FDC programming) is carried out, the track 0 signal of the drive is awaited 
at this pin. This signal is generated by a light barrier or a mechanical switch 
if the write/read head is on physical track 0. The second function, the fault 
signal, is generated by certain disk drives in the event of a fault and can be 
turned off again by the FDC with the FR/STP signal described above. This 
signal is checked during the FDC's read/write operations. 


LCT/DIR: LOW CURRENT/DIRECTION 


The step pulses of FR/STP only indicate, of course, that the head has to be 
displaced. LCT/DIR additionally defines, in seek mode, the direction in 
which the head is to move. The LOW CURRENT function is required when 
writing data. This signal causes the write current to be reduced on the inner 
tracks. You will find more details on this signal in the description of the 
theory of floppy disk storage. 
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WP/TS: WRITE PROTECT/TWO SIDE 

Regardless of the different methods used with different drive sizes, the write 
protected condition is transmitted as a signal from the drive to the controller. 
This signal is tested by input WP/TS during write/read operations. The TS 
signal is tested during seek operations. It is only required in conjunction with 
dual-head disk drives. 

WDA: WRITE DATA 

Via this connection, the serial write data is supplied to the disk drive. This 
can be both the data involved in writing a sector as well as all information 
required when formatting. 

PS0,1: PRE SHIFT 0/1 


Via these pins, the FDC informs appropriate electronic devices, in the case of 
double density format (MFM), of the way in which the serial data stream is 
to be written to the diskette. There are three possible conditions: EARLY, 
NORMAL and LATE for precompensation. 

RD: READ DATA 


The data read from the diskette is fed into the FDC via this input. The bytes 
originally written are retreived from this serial bit stream. 


RDW: READ DATA WINDOW 

This signal is obtained from the data read in a data separator. 

VCO: VCO SYNC 

This signal is required to control the VCO in the PLL data separator. 
MFM: MFM MODE 


This pin indicates whether the controller is operating in single density 
format (MF) or double density format (MFM). 
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Power Supply and Clock Signals 
Vee: +5 Volt 


The FDC is powered via this pin. The voltage of 5V should be constant to 
within +/-5%. The maximum current required by the FDC is 150mA. 


GND: GROUND 
Earth connection of the FDC. 
CLK: CLOCK 


The FDC requires a clock pulse. Depending on the disk drive, this clock 
pulse will have to be 4MHz (for 5 1/4" and smaller) or 8MHz (for 8"). 


WCK: WRITE CLOCK 


The frequency of this signal must be selected in accordance with the data 
format chosen. If the format is MF, the clock pulse must be 100KHz; if it is 
MFM, it must be 1MHz. This frequency determines the speed of data 
transmission from and to the floppy disk. 


1.9.3 Use of the FDC 765 in the CPC 


Unfortunately, the designers have by no means exhausted all the capabilities 
of the FDC. For instance, only two out of the four possible disk drives can be 
linked up. It is not possible to operate dual-head disk drives since, while the 
HEAD-SELECT signal has been provided for, it is not used. But the HEAD 
LOAD signal has fared even worse: it is not connected to anything. However, 
there is some consolation here as not only does their huge size make it 
inconvenient for the "average" user to operate 8" disk drives, but it is also 
impossible to operate them with the controller for other reasons connected 
with the circuitry. 


Despite these limitations, the controller has been very well thought out when 
it comes to the trouble-free operation of two 3" disk drives. A controller 
offering excellent performance has been created with a minimum of 
hardware. 


Luckily, the great economy of design has not placed any limitations on the 
reliability of the machine. The data separator used in the CPC's is the IC 
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SMC 9216, which is well suited for the purpose. This is important as the data 
separator plays a major role in the retrieval of data from the pulse train of 
the floppy disk, and is thus responsible for the error-free reading of 
diskettes. 


Although DMA is the simplest and most elegant way of connecting up the 
floppy controller, another method has been opted for, probably for reasons 
of cost. The FDC is polled. This means that the processor synchronises data 
transfer with the help of the Main Status Register. The interrupts generated 
by the controller are not used. In fact, the interrupt pin of the FDC has not 
been wired. 


The FDC is located at port addresses &FB7E and &FB7F. The main status 
register is at the first address and the data register at the second one. 


The controller also occupies a third address. At port &FAZ7E, there is a 
flip-flop via which the drive motors are controlled. If a "1" is written to this 
port (OUT &FA7E,1, in BASIC), the motors of all the connected drives are 
turned on; if a "0" is written, the motors are tumed off again. 
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1.10 CPC Interfaces 


An interface can be defined as the point of communication between the 
computer and the outside world. The outside world, in this sense, can be 
another computer, a printer or other peripherals, a measuring instrument or 
man himself. In this chapter, we propose to include in this definition of the 
outside world not just the connectors located on the rear of the machine, but 
also the keyboard, monitor connections and recorder. The most important 
interfaces as far as the user is concerned are the keyboard and monitor, as 
these provide for direct communication with the computer. We shall 
therefore start with these two. 


1.10.1 The Keyboard 


The CPC keyboard comprises a total of 74 keys. As the two SHIFT keys are 
connected in parallel, there are thus 73 individual keys to scan. The matrix in 
which the keys are arranged consists of 8 times 10 lines. As the joysticks are 
also operated via this matrix, a total of 79 key positions are occupied. The 
second joystick, which is connected to the first via a jack, does not have its 
own matrix locations; the corresponding switches are connected in parallel 
to the keys of the keyboard. 


In terms of hardware, the keyboard is scanned via the 8255 and the sound 
chip as follows. 


The 8255 supplies a half-byte to port outputs PCO to PC3; this half-byte is 
converted into decimal by decoder IC101. Depending on the input 
information, one of the ten outputs goes low. That is why this decoder, a 
74LS145, is also known as a BCD decimal decoder. If the input information 
is not within a range of 0 to 9, all the decoder outputs go high. 


The parallel port of the sound chip is programmed as an input port for 
keyboard interrogation. If there is no signal present at these inputs, a 1 is 
obtained at all the inputs when the port is read, i.e. $FF in all. 


Let us assume that the input of the decoder is $04. The pin 5 output will thus 
go low. However, the sound chip port will disregard this as long as a 
corresponding key is not pressed. If, for example, the ESC key is pressed, it 
will not produce any results at this time as the pin 8 output of the decoder is 
high. However, if the SPACE key is pressed, the value supplied by the sound 


80 


First Publishing Anatomy of the CPC's 





1.10.1.1. The Keyboard Matrix 


Keyboard 
Connector 
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chip changes. As a result of pressing the key, bit 7 of the port is earthed and 
we obtain a value of $7F from the sound chip. 


All the keys are scanned fifty times per second. For this purpose, the values 0 
to 9 are output, one after another, to the four Port C ouputs used, and the 
value of the sound chip is checked after each output. If any pressed keys are 
registered in the process, these keys are stored in a table and, if necessary, in 
key numbers, and the corresponding characters are converted. 


One very pleasant feature of the keyboard is that up to 20 characters can be 
buffer-stored. In BASIC programs, it is possible to input while the computer 
is still carrying out calculations or printing from the screen. Only when the 
recorder is being used is keyboard interrogation locked out because the time 
required for it is not available since timing is critical. The only exception is 
the ESC key which may be needed in order to interrupt cassette operation. 


Incidentally, the keyboard has one peculiarity. If you depress keys J, K and L 
simultaneously, you will be very surprised to see an H also appear on the 
screen. This always happens if three keys that represent the corners of a 
square on the keyboard matrix are depressed. The same thus applies to 123 
or DFG. In this case, the fourth character of the matrix is displayed at the 
same time. 


This "error" does not have any adverse effects and programs can, of course, 
also be terminated by depressing keys 2, 3 and E simultaneously. 


1.10.2 Video Interface 


The video interface of the CPC provides all the signals required to operate a 
monitor. It is of no importance whether the monitor in question is the one 
supplied with the CPC or (practically) any other one. 


The gate array supplies four signals for the monitor. Three signals contain 
the colour information, while the fourth signal is a composite obtained from 
the CRTC signals VSYNC and HSYNC. These signals are mixed using 
resistors R131, R132 and R133, as well as R195, and amplified by transistor 
Q102. The resulting output signal is the LUM signal, which serves as a video 
signal for the green screen. However, standard commercial colour monitors 
with ordinary video inputs can also be operated using this signal to display all 
the colours. 
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1.10.3 The Floppy Disk Connector 


Not only the CPC computers but also the handbooks supplied with them are 
better and more detailed than those of many competing products. However, 
there are a number of minor errors. For example, the same connectors are 
shown on the rear of the machine in the CPC 6128 handbook as for the CPC 
664. This is not important as regards the other connectors since both the 
number of pins and the pin assignments are the same in both computers. 
However, there are slight differences in the case of the floppy disk 
connector. The 664 has a 34-pin PCB connector, while the 6128 has a 
built-in 36-pin Centronics jack. Pins 1 and 19 of this jack are not occupied. 
Unfortunately, as the pins of the Centronics connectors have not been 
counted in the same way as for the PCB connector, the identification of the 
pins does not correspond to the manual. However, the physical arrangement 
of the pins is identical with the one shown in the manual. It is very easy to 
make an adaptor oneself for a second disk drive, if required, using a length 
of 34-core flat cable, a crimp-connected Centronics plug and the 
corresponding plug for the disk drive. Then, it is also possible to connect 5 
1/4" disk drives. 


The pins of the floppy disk connector will not be discussed separately at this 
point as they have already been described in the chapter on the floppy disk 
controller. 


1.10.4 The Recorder 


"\.the cassette recorder is an excellent standard data store at a very 
reasonable price." 


This statement, quoted from the CPC operating manual (Chapter 2, page 9) 
is correct in all respects. 


Even if you have a floppy disk drive, or intend to acquire one later, the 
built-in recorder will continue to perform a valuable service. As the 3-inch 
diskettes used by the CPC are still relatively expensive, the cassette recorder 
can prove a very valuable "back-up" medium. 


The recorder itself is a standard drive mechanism of the kind to be found in 


unsophisticated cassette and radio recorders; this also explains the presence 
of the Pause key which actually serves no purpose here. 
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The electronics of the recorder of course meet the requirements of the CPC. 
The output signal is a square-wave signal with an amplitude of 
approximately 5 volts. It can therefore be processed directly by bit 7 of Port 
B in the 8255. The audio amplifier via which the sound of the CPC is 
obtained, has also been mounted on the recorder deck. 


But let us turn to the recording format used. Basically, the recorder can only 
store data bit-by-bit. Each byte to be stored thus has to be decomposed into 
its individual bits for transmission. This is carried out via the processor's 
software, the most significant bit being sent to the recorder first. 


The signal that the 8255 supplies to the recorder is a square- wave signal. 
Each bit is recorded as a square-wave oscillation in which the low phase is 
precisely as long as the high phase. We also talk of the square-wave signal 
having a pulse duty factor of 1:1. A 0 bit requires half the time of a 1 bit. 
This is why the recording speed can only be indicated approximately. It is 
clear that a data block consisting entirely of 0 bytes could be stored and 
loaded in half the time that would be required for approximately the same 
length consisting solely of $FF. However, as, statistically, there are 
approximately as many 0 bits in a data block as 1 bits, we can assume a rate of 
1000 Baud (1 Baud = 1 bit/s) for SUPER-SAVE and 2000 Baud for 
SPEED-LOAD. 


Each file, regardless as whether it contains programs or data, can have a 
maximum length of 65536 bytes. The files are transmitted in blocks 
containing 2048 bytes each. Each block contains a maximum of eight 
256-byte long data segments. A header, i.e. a heading or leader, has to be 
transmitted before each block. 


Because there are no electrical connections to the amplifier and loudspeaker, 
data and programmes can be loaded and stored even with the volume set low. 


The block header is easy to identify acoustically. It takes the form of a long, 
uniform tone that can be heard at the start of each block, together with a 
number of subsequent bytes which, however, the ear cannot distinguish. The 
long, uniform tone is a series of 2048 1 bits. These bits are followed by a 
single 0 bit, and then by a flag byte. The long series of 1 bits at the start is 
needed by the computer in order to determine the recording baud rate. The 0 
bit informs the computer that this leader has ended, while the flag byte is 
needed in order to differentiate between the header information and the data. 


The header information is contained in a 64K byte long data area that is 
transmitted before each 2K data block. This header file contains information 
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on the file itself, e.g. the filename, whether the file is protected or not, 
whether it is a BASIC program or an ASCII file, as well as the length of the 
program. 


The detailed composition of this header is as follows: 
Bytes 0-15 : Filename: If it is shorter than 16 bytes, 0's are used to fill in. 


Byte 16 : Block Number: this byte contains the number that is displayed 
upon loading or in the catalogue. 


Byte 17 : If this byte contains a value other than 00, it is the last block in 
the file. 


Byte 18 : This byte contains the File Type. This information is encoded in 
the individual bits. The meanings of the bits are explained at the end of this 
table. 


Bytes 19,20 : These bytes contain the length of the file information in this 
block. If the block, i.e. the 2K, is written completely, these bytes contain the 
value $0800; in the case of the last block, or of programs that are shorter 
than 2K, they contain the number of bytes in the block. 


Bytes 21,22 : These bytes indicate the Load Adress from which data has 
originally been written. In BASIC programs, it is address 368 in decimal 
notation; in the case of binary files, i.e. machine language, it is normally the 
address at which the program runs in the memory. 


Byte 23 : If the contents of this byte are not equal to 0, the block concerned 
is the first Block in the File. 


Bytes 24,25 : These bytes contain the Length of the File. 

Bytes 26,27 : Unfortunately, the possibilities of these bytes are not directly 
supported by the BASIC of the CPC. They contain the Start Address of a 
Machine Language File, which does not necessarily correspond to the load 
Adress. When the load routine is programmed accordingly, these bytes 
permit an "Auto-Start". 


Remaining bytes 28 to 63 of the header are not used by the operating system 
and are at the disposal of the experienced programmer. 


Now to decode the bits in byte 18 of the header. 
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BitO : If this bit is set, the corresponding file is defined as protected. 
Protected programs can be generated by BASIC using 'SAVE "NAME" ,p'. 


Bit1-3 : These bits define the type of file. Although eight different files are 
possible with three bits, only file types Basic Program(0), Binary File(1) and 
ASCII File(3) are used. 


Bits4-7 : A 0 usually occurs in these bits; only ASCII files have a 1 
condition for bit 4. 


As already mentioned, the data stored in the individual blocks is further 
subdivided into individual segments. Each segment consists of 256 data bytes 
and checksum bytes. The checksum of each segment is calculated according 
to a special formula and makes it possible to check that the bits have been 
properly transmitted when the file is read. As soon as the calculated 
checksum fails to correspond to the values read, the READ ERROR B 
message is displayed. 


READ ERROR A indicates that a bit has been read whose time is too long in 
relation to the values calculated for zero or one bits. This error frequently 
occurs during program reading if the cassette has jammed during recording 
and then "drones" during play-back. 


The third possible error is READ ERROR D. This error message should 
only occur very occasionally as it indicates that the block read is longer than 
the permissible 2048 bytes. But this can only occur if the user, when storing, 
has entered larger values than permissible in the header information. 


You are certainly familiar with the BASIC command 'SPEED WRITE par’. 
Depending on the parameter used, data is stored on cassette at average rates 
of 1000 or 2000 Baud. However, this is not the upper speed limit. By using 
an operating system routine, each Baud rate can be adjusted between 700 
Baud and approximately 3600 Baud. The entrance of the required routine is 
at address $BC68. It expects parameters in two registers and adjusts the 
writing speed accordingly. A value is transmitted in the HL register pair and 
determines the Baud rate. The equation for determining this value is as 
follows: 


Baudrate = 333333/half-length of a zero bit 


At 1000 Baud, this gives a time of 666 microseconds for a zero bit, a one bit 
being double this length. 
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The electronics used in the recorder have one special feature. If zero and one 
bits are read alternately, the electronics attempt to even out the time 
differentials. As a result, the one bits become shorter and the pulse lengths of 
the zero bits appear longer than they would be expected to be, given the 
recording speed. Consequently, there has to be pre-compensation to record 
the zero bits as shorter and allow a slightly longer time for the recording of 
the one bits. These pre-compensation times are transmitted in the 
accumulator to the routine. 


When attempting to determine the maximum, more or less reliable writing 
speed, its suffices to transmit in the accumulator a value of 10. In order to 
record at 3600 Baud, the following routine has to be activated : 


LD HL,93 

LD A,10 
CALL &BC68 
RET 


These few bytes can easily be stored with the following lines: 


10 MEMORY HIMEM - 10 

20 FOR T=1TO9 

30 READ X : POKE HIMEM + I,X 

40 NEXT I 

50 CALL HIMEM + 1 

60 DATA &21,&5D,&00,&3E,&0A,&CD,&68,&BC,&C9 


Just experiment by making a few changes with the values in HL and the 
accumulator (second and fifth values on the data line) in order to determine 
the maximum recording frequency. This depends on the cassette material 
used, but the synchronous operation of your recorder makes no small 
contribution to reliability at high recording speeds. 


If the values selected are too small, the CPC will no longer be able to keep to 
the required times; as a result, you will get the WRITE ERROR A message. 


You will certainly have noticed, when storing very long programs with large 
numbers of variables, that it can take up to 15 minutes for the data or the 
program to be stored. This is because the CPC, when storing, requires an 
area of 2K for the blocks to be transmitted. The buffer is located at the upper 
storage limit. However, if this area is occupied by variables, these variables 
are copied to another storage area. This process is comparable with the 
dreaded GARBAGE collection, which always occurs when there is 
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insufficient room in the memory for character strings and arrays. 


However, the waiting time due to the garbage collection can be shortened 
considerably by having this 2K buffer ready at the start of the corresponding 
program and protected. Here is one possible program start: 


10 OPENOUT "DUMMY" 
20 MEMORY HIMEM - 1 

30 CLOSEOUT 

40 

50 'REST OF PROGRAM 


Of course, there is no point in adopting this procedure unless you are also 
working with files in the corresponding program. If this is not the case, you 
can dispense with the program lines shown and input the CLEAR command 
before storing the data you want. In this way, all the previously defined 
variables are deleted and the cassette buffer can be provided without any real 
loss of time. 
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1.10.5 The Centronics Printer Interface 


In every computer, you will find something that you think needs improving. 
In the case of the CPC, this is unquestionably the printer interface. Although 
many of the weaknesses and defects of the CPC 464 have been eradicated in 
its successors, the 664 and 6128, no change has been made to the worst of the 
weak points, the printer interface. Even these computers still only have a 7- 
bit interface built in. As, however, most printers, even the one supplied by 
Amstrad for the CPC, have 8-bit inputs, many of their commands and 
features can only be used by adopting round-about solutions, if at all. 


But let us first look at the set-up of the interface in terms of hardware. 


The interface consists essentially of an 8-latch 74LS273. The 8 individual 
latches function as flip-flops; the data present at the inputs is stored at 
clocked input pin 11 when a high-low edge occurs and remains available at 
the outputs until the next RESET or reprogramming, regardless of changing 
input signals. 


The clock signal, the high-low edge of which causes the input values to be 
stored, is generated by an OR gate. The gate output goes low when both 
inputs are low. 


The printer interface is also addressed via the port addressing system. This is 
why signal IOWR* is present at one input of the OR gate while address line 
A12 is present at the other input. As when addressing the other peripheral 
components, decoding is thus very incomplete. As a result, all address lines 
that are not required for decoding have to be high in order to prevent 
collision with other port addresses used. This gives an effective port address 
of &EFXX. 


The inputs of the printer latch are associated with the processor's data bus. 
The outputs are applied to the printer interface. Only bit 7 is applied to the 
Centronics port via a NAND gate used as an inverter. This bit provides the 
strobe signal required for the printer. Usually, this signal is high. However, 
if the computer wishes to send a character to the printer, it places the byte for 
transmission on the data lines and sets the strobe signal low shortly 
afterwards. In this way, the byte for transmission is accepted by the printer. 


A precondition for this is that the printer's busy signal should be low. The 
condition of the busy signal is interrogated by bit 6 of 8255 Port B. 


But how can the strobe signal be generated? Nothing could be simpler. 
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Each byte for transmission is first XORed with &7F. This makes certain that 
the highest-order bit of the byte is reset. This byte is output via the OUT 
command to the printer port. 


The bits for transmission are now available at the printer, but the strobe 
signal via the inverter is still high. Bit 7 of the value to be output is, 
therefore, then set with OR &80 and also output to the printer port. There is 
no change in the value to be transmitted; the strobe signal has simply gone 
low via the inverter. 

But this signal then has to go high again; the highest-order bit is therefore 
reset again with AND and the byte is output once more. The computer has 
now sent a byte to the printer. 


Outputting to the printer is no problem using BASIC. But even with machine 
language, there is no need to write the entire interface yourself. There are a 
number of routines that save you some of the programming work. 


First, there is the routine with an entry at &BD2B. This routine can be used 
to output a character to the printer. For this purpose, the character 
concerned must be contained in the accumulator. In addition, this routine 
checks whether the printer is "busy". If the printer fails to signal that it is 
ready within 0.4 seconds, the routine returns with the carry flag reset. A 
fresh start attempt then has to be made with the same character. This routine 
is also used by the BASIC interpreter. If transmission is successful, the carry 
flag is set. The next character can then be sent. 


There is also a routine that has its entry three bytes further on (&BD2E). 
This routine can be used to check the status of the printer. If no printer is 
connected up or if the printer reports "busy", i.e. that it cannot accept any 
characters for the time being, this routine reverses with the carry flag set; 
otherwise, the carry flag is reset. 


The third routine that can be used (&BD31) performs all the operations 
required in order to output a character on the printer. When using it, the 
programmer must first check whether the printer is ready to receive and 
transmit the required character in the accumulator. Failure to check status 
may result in the loss of the character. 


You will find out how to use these routines later in the book when we will 


show you how to apply these and other routines, by taking text and graphics 
hard copy examples. 
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Just one more point to be noted about the circuitry of the Centronics 
interface. 


To make a Centronics cable, all you need are the necessary plug- in 
connectors and a length of flat cable. If the connectors are crimped, even 
CPC owners who are no good with their hands can put together a cable of 
this type in 5 to 10 minutes. In this way, any printer can be used with a 
Centronics input on the CPC. However, the printer does use a lot of paper, so 
beware, as after each line printed, it jumps one line. 


The reason is as follows: 


The CPC adds the characters CR/LF at the end of each print line, that is to 
say the sequence of commands for carriage return and line feed. As a result, 
the paper is moved one line on. In addition, and without any apparent reason, 
however, pin 14 of the CPC Centronics interface is earthed. With most 
printers, this leads to a further line feed, which always produces a blank line. 


The solution in this case is to disconnect the line to pin 14 of the printer. 
Once this has been done, and any necessary adjustments have been made to 
the switches in the printer everything should work. 


1.10.6 Joystick Interface 


As a rule, the joystick interface will certainly be used in the way its name 
suggests: interpreting the position of a joystick. However, other keys or 
switches can also be interpreted via seven of the 9 available pins. By suitable 
programming and by dispensing with interrupt and keyboard encoding, 
these seven pins could even be used as outputs. The joystick interfaces are, of 
course, associated with the bidirectional port of the sound chip and could 
function as outputs, with the above limitations. However, the Centronics port 
is certainly easier to use for output. 


As already described in Chapter 1.10.1., the joysticks are regarded in the 
same way as the keys on the keyboard. This is why the seven required inputs 
of the sound chip are connected to the joystick jack. In addition, two outputs 
of the BCD decimal decoder, IC101, are also connected to the jack. 


Every fiftieth of a second, the keyboard is scanned. The condition of the 


joystick is interpreted at the same time. In the case of BASIC programs, the 
condition of the joystick is available together with the JOY (number) 
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function. The condition of the joystick could also be determined simply by 
means of INKEY. But, for assembler fans, there is also a simple means of 
determining the condition of the joystick. The system routine, &BB24, 
supplies the current condition encoded in bits in the HL double-length 
register. When this routine is called, the H register and the accumulator give 
joystick condition 0, while the L register provides joystick condition 1. The 
joystick keys are encoded in the same way as for the JOY(x) function. Bit 0 is 
set for forward and bit 1 for backwards, bit 2 for left, etc. 


1.10.7 The Expansion Connector 


This interface is the most universal one in the CPC. In addition to all the 
signals of a processor, this 50-pin printed circuit board connector comprises 
various control signals. This is where all the system expansions are 
connected. 


We are, of course, already familiar with the meanings of signals 3 to 39 from 
the description of the processor, so we shall only look at the remaining pins. 


Once again, the sound signal is available at pin 1. However, this signal is only 
mono; all three channels are directly connected to it. 


Pins 2 and 49 are connected to the earth of the power supply. 


One particular feature is the BUS-RESET™ signal at pin 40. When this signal 
goes low, there is a system reset. Unfortunately, when there is a reset, the 
CPC deletes the entire memory. As a result, this signal is precisely as 
effective as an "emergency brake" for crashed machine language programs 
as switching off and on again. 


The real RESET signal for external expansions is provided at pin 41. 
However, you must realise that it cannot cater for all components. For 
example, the 8255 requires this signal to be inverted. 


The two signals ROMEN* and ROMDIS are quite interesting. The ROMEN* 
signal at pin 42 of the expansion connector, when low, indicates the accessing 
of the built-in 32K ROM. However, this accessing can be subordinated to 
ROMDIS by a high at pin 43. In this way, the entire built-in ROM can be 
replaced by external ROM's or EPROM's. However, by suitably decoding 
the address lines, it is also possible to mask and replace only certain areas in 
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the built-in ROM. 


Signals RAMRD* and RAMDIS perform similar functions when read- 
accessing the internal RAM. These signals, present at pins 43 and 44, can be 
used, for example, to exchange certain RAM areas for ROM's or other 
RAM's. Control of the external RAM's, however, is not quite as simple as it 
should be. The main difficulty is that the WR* signal for the internal RAM's 
is produced, not by the processor, but by the gate array. Unfortunately, this 
write pulse cannot be prevented using any (known?) programming method, 
with the result that a write access to an external RAM always involves 
addressing and writing to the internal RAM as well. 


The CURSOR signal available at pin 46 is supplied, when programmed by 
the video controller. The CRTC does have the possibility of using the 
hardware cursor. Depending on programming, a square-wave signal with a 
frequency of approximately 1.5 or 3Hz will appear at this output. However, 
constant low and high conditions are also programmable at this pin. After the 
CPC is switched on, a constant low occurs here. 


The LPEN (Light Pen) input at pin 47 is directly connected with the Light 
Pen input of the CRTC. This IC has all the necessary registers to operate the 
Light Pen. However, it is very difficult to use the Light Pen in the CPC, 
particularly with high resolution graphics, as the video controller, while it 
does provide the MA address of the current Light Pen position, gives no 
indication of the current RA address. But this information is needed, given 
the special set-up of the video RAM, in order to use the Light Pen to draw on 
the screen. 


The pin 48 input is known as EXP* and is associated with bit 4 of 8255 Port 
B. An external expansion can earth this pin and thus signal its presence to the 
operating system. 


The last signal that requires mentioning is the processor's clock signal at pin 


50. This signal, which has a frequency of 4MHz, is required as a clock signal 
for the disk controller, etc. 
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2 THE OPERATING SYSTEM 


This name, which is meaningless for the uninitiated, is the central control for 
the entire computer. Practically speaking, the Operating System is a 
program which controls the interfaces between the user programs and the 
hardware. 


Even the BASIC interpreter can be considered, in this connection, as a 
program that accesses the computer hardware via the operating system. It is 
because of these inter-linking functions that we have moved this chapter into 
the middle of the book. 


The operating system is logically subdivided into so-called packs, each of 
which has a special area of tasks. This starts, at the lowest level, with the 
MACHINE PACK , which is most closely associated with the hardware and 
operates, for example, the printer port, the sound register, etc., and then on 
through the SCREEN PACK that handles the monitor and which, for its part, 
is called up by the TEXT PACK and GRAPHICS PACK . 


If we look closely, we will see that each pack is very self- contained and that 
communication with other packs is via precisely defined interfaces. In 
addition to this, each pack has its own RAM area as a working storage. 
Routines are generally started via vectors in the RAM and seldom via the 
direct ROM address. 


This would seem to suggest that the operating system, presumably owing to 
lack of time, was written by several different programmers, each being 
responsible for one or more packs, after agreement had been reached simply 
for the interfaces. No matter, this clear structure, together with the 
possibility of accessing every portion via vectors opens up unthought of and 
hitherto unknown prospects for application programmers. To take just one 
example, you can write a driver for a real eight-bit printer (however, this 
may be connected from the hardware viewpoint) and make it accessible to 
the entire system simply by changing the vector MC WAIT PRINTER. This 
tip should also serve you as a warning: Use the routines of the operating 
system by all means, but only via the vectors. Someone else (ROM 
CARTRIDGE) may, in fact, already have adjusted certain vectors in order to 
route certain functions via his own routines. You would look pretty silly 
with your printer driver if the output for File-#8 ran directly via $07F2 and 
not via $BDF1. 
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In time, you will find out for yourself that you can write your own programs 
with a minimum of work as long as you are careful to use the vectors. What 
is completely new is that even the arithmetic routines of BASIC run via this 
mechanism, which means, on the one hand, that you can have your own 
calculations made there and, on the other hand, add your own programs 
because you want greater accuracy, etc. 


Now that we have told you so much about the merits of vectors, we shall start 
with them in the next chapter. 


2.1. The Operating System Vectors 


In the following pages, we shall be introducing you to the RAM addresses via 
which you can start routines in the operating system or which can be 
changed, if necessary, in order to operate certain functions using your own 
programs. 


Some of these routines here are complete routines that have been copied to 
the RAM and that you can enter directly, while others are RST1 or RSTS, 
followed by the Inline address which refers to the ROM. 


In the Annex, you will find a listing of the routines in the ROM which should 
help you to locate the complete routine more quickly. 


2.1.1 The Operating System Vectors of the CPC 464 


In the following pages, we shall be introducing you to the RAM addresses 
and routines which you can use in the operating system or which you can 
change, if necessary, in order to operate certain functions using your own 
programs. 


The routine functions are outlined in a couple of words when the name alone 
does not convey much. You will find fuller details on certain aspects in the 
introduction to the packs concerned. 


Some of these routines here are complete routines that have been copied and 
that you can enter directly if need be, while others are RST1 or RSTS, 
followed by the address (see Chapter 1.1.2), which refers to the ROM. You 
can consult Apendix 4.1 to see where these routines can be found in the 
ROM. 
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B900 KL U ROM ENABLE 

B903 KL U ROM DISABLE 

B906 KL L ROM ENABLE 

B909 KL L ROM DISABLE 

B90C KL ROM RESTORE restores the previous ROM configuration 

B90F KL ROM SELECT brings an expansion ROM (up to 252 are 
theoretically possible) into play 

B912 KL CURR SELECTION Which expansion ROM is currently in 
operation? 

B915 KL PROBE ROM What kind of ROM expansion is involved? 

B918 KL ROM DESELECT Restore previous ROM expansion 

B91B KL LDIR 

B91E KL LDDR 

B921 KL POLL SYNCHRONOUS Is there an event with a higher priority 
than the current event? 

B939 RST 7 INTERRUPT ENTRY CONT'D 

B97C KL LOW PCHL CONT'D 

B982 RST 1 LOW JUMP CONT'D 

B9A8 Config. prep. and jump exec. 

B9B1 KL FAR PCHL CONT'D 

B9B9 KL FAR ICALL CONT'D 

B9BF RST 3 LOW FAR CALL CONT'D 

BA10 KL SIDE PCHL CONT'D 

BA16 RST 2 LOW SIDE CALL CONT'D 

BA2E RST 5 FIRM JUMP CONT'D 

BA4A KL L ROM ENABLE CONT'D 

BAS54 KL L ROM DISABLE CONT'D 

BASE KL U ROM ENABLE CONT'D 

BA68 KL U ROM DISABLE CONT'D 

BA72 KL ROM RESTORE CONT'D 

BA7E KL ROM SELECT CONT'D 

BA83 KL PROBE ROM CONT'D 

BA8C KL ROM DESELECT CONT'D 

BAA2 KL CURR SELECTION CONT'D 

BAA6 KL LDIR CONT'D 

BAAC KL LDDR CONT'D 

BACB RST 4 RAM LAM CONT'D 

BADC RAM LAM (IX) corresponds to Id a,(ix) 

BBOO KM INITIALISE 

BB0O3 KM RESET 

BB06 KM WAIT CHAR Wait for a character from the keyboard 

BBO9 KM READ CHAR Fetch character from the keyboard, if available 
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BBOC KM CHAR RETURN Place character in keyboard buffer for next 
access 

BBOF KM SET EXPAND Set expansion string 

BB12 KM GET EXPAND Fetch character from expansion string 

BB15 KM EXP BUFFER Allocate memory for expansion string 

BB18 KM WAIT KEY Wait for key depression 

BB1B KM READ KEY Fetch key number if a key has been depressed 

BB1E KM TEST KEY Has a key been depressed? 

BB21 KM GET STATE Fetch shift state 

BB24 KM GET JOYSTICK 

BB27 KM SET TRANSLATE Effect entry in keyboard table (1st. level) 

BB2A KM GET TRANSLATE Fetch entry from keyboard table (1st. level) 

BB2D KM SET SHIFT As for BB27, but 2nd. level 

BB30 KM GET SHIFT As for BB2A, but 2nd. level 

BB33 KM SET CONTROL As for BB27, but 3rd. level 

BB36 KM GET CONTROL As for BB2A, but 3rd. level 

BB39 KM SET REPEAT Set repeat function for a given key 

BB3C KM GET REPEAT Is the repeat function set for a given key? 

BB3F KM SET DELAY Set key repetition and rate 

BB42 KM GET DELAY Fetch above parameters 

BB45 KM ARM BREAK Enable Break key 

BB48 KM DISARM BREAK Lock Break key 

BB4B KM BREAK EVENT Execute routines by depressing the break key 

BB4E TXT INITIALISE 

BBS51 TXT RESET 

BB54 TXT VDU ENABLE Characters can be written to the screen 

BBS7 TXT VDU DISABLE Disable character display 

BBSA TXT OUTPUT Display or execute (control) character 

BBSD TXT WR CHAR Display character 

BB60 TXT RD CHAR Read character from screen 

BB63 TXT SET GRAPHIC Turn display of control characters on or off 

BB66 TXT WIN ENABLE Define size of current text window 

BB69 TXT GET WINDOW What is size of current text window? 

BB6C TXT CLEAR WINDOW Clear current text window 

BB6F TXT SET COLUMN 

BB72 TXT SET ROW 

BB75 TXT SET CURSOR 

BB78 TXT GET CURSOR 

BB7B TXT CUR ENABLE Enable cursor (user program) 

BB7E TXT CUR DISABLE Disable cursor (user) 

BB81 TXT CUR ON Enable cursor (operating system) 

BB84 TXT CUR OFF Disable cursor (operating system, higher priority than 
BB7B/BB7E) 
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BB87 TXT VALIDATE Cursor within text window? 

BB8A TXT PLACE CURSOR Cursor on 

BB8D TXT REMOVE CURSOR Cursor off 

BB90 TXT SET PEN Set foreground colour 

BB93 TXT GET PEN Foreground colour? 

BB96 TXT SET PAPER Set background colour 

BB99 TXT GET PAPER Background colour? 

BB9C TXT INVERSE Interchange current foreground and background 
colours 

BB9F TXT SET BACK Transparent mode on/off 

BBA2 TXT GET BACK Transparent mode? 

BBAS5 TXT GET MATRIX Fetch address of dot matrix for a character 

BBA8 TXT SET MATRIX Set address of (user-defined) dot matrix for a 
given character 

BBAB TXT SET M TABLE Set start address and first character of a 
user-defined dot matrix 

BBAE TXT GET M TABLE Start address and first character of a user 
matrix? 

BBB1 TXT GET CONTROLS Fetch address of control character branch 
table 

BBB4 TXT STR SELECT Select text window 

BBB7 TXT SWAP STREAMS The parameters (colours, window limits, 
etc.) of two text windows are interchanged 

BBBA GRA INITIALISE 

BBBD GRA RESET 

BBCO GRA MOVE ABSOLUTE 

BBC3 GRA MOVE RELATIVE 

BBC6 GRA ASK CURSOR Where is current graphics cursor? 

BBC9 GRA SET ORIGIN 

BBCC GRA GET ORIGIN 

BBCF GRA WIN WIDTH Set left and right-hand limits of graphics window 

BBD2 GRA WIN HEIGHT Set upper and lower limits of graphics window 

BBDS5 GRA GET W WIDTH Left and right-hand limits of graphics 
window? 

BBD8 GRA GET W HEIGHT Upper and lower limits of graphics window? 

BBDB GRA CLEAR WINDOW Clear graphics window 

BBDE GRA SET PEN Set printing colour 

BBE1 GRA GET PEN Printing colour? 

BBE4 GRA SET PAPER Set background colour 

BBE7 GRA GET PAPER Background colour? 

BBEA GRA PLOT ABSOLUTE Set graphics dot (absolute) 

BBED GRA PLOT RELATIVE Set graphics dot (relative to current cursor) 

BBFO GRA TEST ABSOLUTE Dot set? (absolute) 
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BBF3 GRA TEST RELATIVE Dot set (relative to current cursor) 

BBF6 GRA LINE ABSOLUTE Draw line from current to absolute position 

BBF9 GRA LINE RELATIVE Draw line from current to relative distance 

BBFC GRA WR CHAR Write a character at current graphics cursor position 

BBFF SCR INITIALISE 

BC02 SCR RESET 

BCO05 SCR SET OFFSET Set start address of first character relative to base 
address of video RAM 

BC08 SCR SET BASE Set base address of video RAM 

BCOB SCR GET LOCATION Current screen starting location? 
(Base+offset) 

BCOE SCR SET MDE 

BC11 SCR GET MODE 

BC14 SCR CLEAR Clear screen 

BC17 SCR CHAR LIMITS Fetch maximum possible line and column 
number of screen (depends on mode) 

BC1A SCR CHAR POSITION 

BC1D SCR DOT POSITION 

BC20 SCR NEXT BYTE Move a given screen address one character 
position on 

BC23 SCR PREV BYTE Move a screen address one position back 

BC26 SCR NEXT LINE Move a screen address one line on 

BC29 SCR PREV LINE Move a screen address one line back 

BC2C SCR INK ENCODE 

BC2F SCR INK DECODE 

BC32 SCR SET INK Assign colour(s) of an ink -/// 

BC35 SCR GET INK Colour(s) of an ink -///? 

BC38 SCR SET BORDER Set border colour(s) 

BC3B SCR GET BORDER Border colour(s)? 

BC3E SCR SET FLASHING Set flashing times 

BC41 SCR GET FLASHING Flashing times? 

BC44 SCR FILL BOX Fill predetermined window with a colour (positions 
character-related, mode-dependent) 

BC47 SCR FLOOD BOX Fill predetermined window with a colour 
(positions are screen addresses, mode-dependent) 

BC4A SCR CHAR INVERT Interchange foreground and background colour 
of a character 

BC4D SCR HW ROLL Screen one line up or down (using hardware) 

BCS0O SCR SW ROLL Screen one line up or down (using software) 

BC53 SCR UNPACK Enlarge character matrix (for modes 0/1) 

BCS56 SCR REPACK Reduce character matrix to its original size 

BC59 SCR ACCESS Set control characters visible/invisible 

BCSC SCR PIXELS Set dot on screen 
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BCS5F SCR HORIZONTAL Draw horizontal line 

BC62 SCR VERTICAL Draw vertical line 

BC65 CAS INITIALISE 

BC68 CAS SET SPEED Set writing speed 

BC6B CAS NOISY Cassette messages on/off 

BC6E CAS START MOTOR 

BC71 CAS STOP MOTOR 

BC74 CAS RESTORE MOTOR Restore previous motor condition 

BC77 CAS IN OPEN 

BC7A CAS IN CLOSE 

BC7D CAS IN ABANDON Close input file immediately 

BC80 CAS IN CHAR Read character (from buffer) 

BC83 CAS IN DIRECT Put entire file into the memory 

BC86 CAS RETURN Return last read character to the buffer 

BC89 CAS TEST EOF End of file? 

BC8C CAS OUT OPEN 

BC8F CAS OUT CLOSE 

BC92 CAS OUT ABANDON Close output file immediately 

BC95 CAS OUT CHAR Write character (to the buffer) 

BC98 CAS OUT DIRECT Write defined storage area to cassette (not via 
buffer) 

BC9B CAS CATALOG 

BC9E CAS WRITE Write block 

BCAI1 CAS READ Read block 

BCA4 CAS CHECK Compare block on tape with memory contents 

BCA7 SOUND RESET 

BCAA SOUND QUEUE Add tone to the queue 

BCAD SOUND CHECK Still room in the queue? 

BCBO SOUND ARM EVENT Keep event block "on the alert" in case a place 
in the queue becomes free 

BCB3 SOUND RELEASE Release sound 

BCB6 SOUND HOLD Hold sound immediately 

BCB9 SOUND CONTINUE Continue sound previously held 

BCBC SOUND AMPL ENVELOPE Set volume envelope 

BCBF SOUND TONE ENVELOPE Set sound tone envelope 

BCC2 SOUND A ADDRESS Fetch address of a volume envelope 

BCC5 SOUND T ADDRESS Fetch address of a tone envelope 

BCC8 KL CHOKE OFF Reset kernel 

BCCB KL ROM WALK Any ROM expansions? 

BCCE KL INIT BACK Add ROM expansion 

BCD1 KL LOG EXT Add resident expansion 

BCD4 KL FIND COMMAND Find command in all added storage areas 

BCD7 KL NEW FRAME ELY Set and add event block 
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BCDA KL ADD FRAME FLY Add event block 

BCDD KL DEL FRAME FLY Remove event block 

BCEO KL NEW FAST TICKER As for BCD7 

BCE3 KL ADD FAST TICKER As for BCDA 

BCE6 KL DEL FAST STICKER As for BCDD 

BCE9 KL ADD TICKER Set and add ticker block 

BCE7 KL DEL TICKER Remove ticker block 

BCEF KL INIT EVENT Set event block 

BCF2 KL EVENT "Kick" event block 

BCFS5 KL SYNC RESET Reset Sync pending queue 

BCF8 KL DEL SYNCHRONOUS Delete given block from Pending Queue 

BCFB KL NEXT SYNC Next please 

BCFE KL DO SYNC Execute event routine 

BDO1 KL DONE SYNC Event routine completed 

BD04 KL EVENT DISABLE 

BD07 KL EVENT ENABLE 

BDOA KL DISARM EVENT Disable event block (counter negative) 

BDOD KL TIME PLEASE 

BD10 KL TIME SET 

BD13 MC BOOT PROGRAM Resets operating system and hands over 
control to a routine in (hl) 

BD16 MC START PROGRAM 

BD19 MC WAIT FLYBACK Wait for fly-back 

BDIC MC SET MODE 

BD1F MC SCREEN OFFSET 

BD22 MC CLEAR INKS 

BD25 MC SET INKS 

BD28 MC RESET PRINTER 

BD2B MC PRINT CHAR Print character if necessary 

BD2E MC BUSY PRINTER Printer still busy? 

BD31 MC SEND PRINTER Print character (wait until OK) 

BD34 MC SOUND REGISTER Supply sound controller with data 

BD37 JUMP RESTORE Initialise all jump vectors. 


The following vectors are used by BASIC. 


BD3A EDIT 

BD3D FLO Copy variable from (de)***(hl) 
BD40 FLO Int***Flo 

BD43 FLO 4 Byte value***Flo 

BD46 FLO Flo***Int 

BD49 FLO Flo***Int 

BD4C FLO FIX 
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BD4F FLO INT 

BDS52 FLO 

BD55 FLO Multiply figure by 1OPPPPa 
BDS58 FLO Addition 

BDS5B FLO Subtraction 

BDSE FLO Subtraction 

BD61 FLO Multiplication 

BD64 FLO Division 

BD67 FLO Multiply figure by 2PPPPa 
BD6A FLO Comparison 

BD6D FLO Sign change 

BD70 FLO SGN 

BD73 FLO DEG / RAD 

BD76 FLO PI 

BD79 FLO SQR 

BD7C FLO Exponentiation 

BD7F FLO LOG 

BD82 FLO LOG10 

BD85 FLO EXP 

BD88 FLO SIN 

BD8B FLO COS 

BD8E FLO TAN 

BD91 FLO ATN 

BD94 FLO 4 Byte value * 256PPPPFlo 
BD97 FLO RND Init 

BD9A FLO Set RND Seed 

BD9D FLO RND 

BDAO FLO Fetch last RND value 
BDA3 INT 

BDA6 INT 

BDAQ INT Transfer sign to b 
BDAC INT Addition 

BDAF INT Subtraction 

BDB2 INT Subtraction 

BDBS INT Multiplication with sign 
BDB8 INT Division with sign 
BDBB INT MOD 

BDBE INT Multiplication without sign 
BDC1 INT Division without sign 
BDC4 INT Comparison 

BDC7 INT Sign change 

BDCA INT SGN 
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This is where the so-called INDIRECTIONS start. These are jumps into the 
operating system that are not supplied globally but individually by each pack 
when its RESET or INITIALISE is run. 


BDCD TXT DRAW CURSOR Draw cursor on screen 
BDDO TXT UNDRAW CURSOR Remove cursor 
BDD3 TXT WRITE CHAR Write character on screen 
BDD6 TXT UNWRITE Read character from screen 
BDD9 TXT OUT ACTION Represent or execute character 
BDDC GRA PLOT Set dot 

BDDF GRA TEST Dot? 

BDE2 GRA LINE Draw line 

BDES SCR READ Fetch dot from screen 

BDE8 SCR MODE CLEAR Clear screen with Ink///O 
BDEE KM TEST BREAK Break key depressed? 
BDF1 MC WAIT PRINTER Send character to printer. 
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2.1.2. The Operating System Vectors of the CPC 664 


B900 KL U ROM ENABLE Enable current upper ROM 

B903 KL U ROM DISABLE Disable upper ROM 

B906 KL L ROM ENABLE Enable lower ROM 

B909 KL L ROM DISABLE Disable lower ROM 

B90C KL ROM RESTORE Restore old ROM configuration 

B90F KL ROM SELECT Select a given upper ROM 

B912 KL CURR SELECTION Which upper ROM is on? 

B915 KL PROBE ROM Probe ROM 

B918 KL ROM DESELECT Restore old upper ROM configuration 

B91B KL LDIR LDIR if ROM's blocked 

B91E KL LDDR LDDR with ROM's blocked 

B921 KL POLL SYNCHRONOUS Is there an event with a higher priority 
than that of the current event? 

B941 RST7 INTERRUPT ENTRY CONT'D Entry for hardware interrupts 

B978 KL EXT INTERRUPT ENTRY 

B984 KL LOW PCHL CONT'D Jump to lower ROM or RAM 

B98A RST 1 LOW JUMP CONT'D Routine called in the operating system or 
in the RAM below it 

B9B9 KL FAR PCHL CONT'D 

B9C1 KL FAR ICALL CONT'D 

B9C7 RST 3 LOW FAR CALL CONT'D A routine can be called anywhere 
in the RAM or ROM 

BA17 KL SIDE PCHL CONT'D 

BAID RST 2 LOW SIDE CALL CONT'D Serves to call a routine in the 
expansion ROM 

BA35 RST 5 FIRM JUMP CONT'D Permits a jump to a routine in the 
operating system 

BAS1 KL L ROM ENABLE CONT'D Enable lower ROM 

BAS8 KL L ROM DISABLE CONT'D Disable lower ROM 

BASF KL U ROM ENABLE CONT'D Enable upper ROM 

BA66 KL U ROM DISABLE CONT'D Disable upper ROM 

BA70 KL ROM RESTORE CONT'D Restore old ROM configuration 

BA79 KL ROM SELECT CONT'D Select a given upper ROM 

BA7E KL PROBE ROM CONT'D Probe ROM 

BA87 KL ROM DESELECT CONT'D Restore old upper ROM 
configuration 

BA9D KL CURR SELECTION CONT'D Which upper ROM is on? 

BAAI KL LDIR CONT'D LDIR if ROM's blocked 

BAA7 KL LDDR CONT'D LDDR if ROM's blocked 

BAAD KL ROM OFF & CONFIG. SAVE 
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BAC6 RST 4 RAM LAM CONT'D Read RAM contents, regardless of ROM 
status 

BAD7 KL RAM LAM (IX) Currently corresponds to a, (ix) 

BBOO KM INITIALISE Complete initialisation of keyboard management 

BBO3 KM RESET Reset keyboard management 

BB06 KM WAIT CHAR Wait for character from keyboard 

BB09 KM READ CHAR Get character from the keyboard, if a character is 
available 

BBOC KM CHAR RETURN Deposit character in the keyboard buffer store 
for the next access 

BBOF KM SET EXPAND Set up expansion string 

BB12 KM GET EXPAND Get character from expansion string 

BB15 KM EXP BUFFER Allocate memory for expansion string 

BB18 KM WAIT KEY Wait for key depression 

BB1B KM READ KEY Get key number if a key has been depressed 

BB1E KM TEST KEY Has a key been depressed? 

BB21 KM GET STATE Get shift status 

BB24 KM GET JOYSTICK The current status of the joystick is interrogated 

BB27 KM SET TRANSLATE Make entry in keyboard table (1st. level) 

BB2A KM GET TRANSLATE Get entry from keyboard table (1st. level) 

BB2D KM SET SHIFT Make entry in keyboard table (2nd. level) 

BB30 KM GET SHIFT Get entry from keyboard table (2nd. level) 

BB33 KM SET CONTROL Make entry in keyboard table (3rd. level) 

BB36 KM GET CONTROL Get entry from keyboard table (3rd. level) 

BB39 KM SET REPEAT Set repeat function for a given key 

BB3C KM GET REPEAT Repeat function set for a given key? 

BB3F KM SET DELAY Set key repeat function and speed 

BB42 KM GET DELAY Get parameters for key repeat function and speed 

BB45 KM ARM BREAK Arm break key 

BB48 KM DISARM BREAK Disarm break key 

BB4B KM BREAK EVENT Execute routines by pressing the break key 

BB4E TXT INITIALISE Complete initialisation of the Text Pack 

BB51 TXT RESET Reset the Text Pack 

BB54 TXT VDU ENABLE Characters can be written to the screen 

BB57 TXT VDU DISABLE Disable character display 

BB5SA TXT OUTPUT Display or execute (control) character 

BBS5D TXT WR CHAR Display character 

BB60 TXT RD CHAR Read character from screen 

BB63 TXT SET GRAPHIC Turn control character display on or off 

BB66 TXT WIN ENABLE Determine size of current text window 

BB69 TXT GET WINDOW What is size of current text window? 

BB6C TXT CLEAR WINDOW Clear current text window 

BB6F TXT SET COLUMN Set horizontal position of cursor 
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BB72 TXT SET ROW Set vertical position of cursor 

BB75 TXT SET CURSOR Position cursor 

BB78 TXT GET CURSOR Interrogate current cursor position 

BB7B TXT CUR ENABLE Enable cursor 

(User program) 

BB7E TXT CUR DISABLE Disable cursor 

(User program) 

BB81 TXT CUR ON Enable cursor (operating system) 

BB84 TXT CUR OFF Disable cursor (operating system, higher priority than 
BB7B TXT CUR ENABLE/BB7E TXT CUR DISABLE) 

BB87 TXT VALIDATE Cursor inside text window? 

BB8A TXT PLACE/REMOVE CURSOR Place cursor on screen/remove 
cursor from screen 

BB8D TXT PLACE/REMOVE CURSOR Set cursor on screen/remove 
cursor from screen 

BB90 TXT SET PEN Set foreground colour 

BB93 TXT GET PEN Which foreground colour? 

BB96 TXT SET PAPER Set background colour 

BB99 TXT GET PAPER Which background colour? 

BB9C TXT INVERSE Invert current foreground and background colours 

BB9F TXT SET BACK Transparent mode on/off 

BBA2 TXT GET BACK Which transparent mode? 

BBAS TXT GET MATRIX Get address of the dot matrix of a character 

BBA8 TXT SET MATRIX Set address of the (user-defined) dot matrix of a 
given character 

BBAB TXT SET M TABLE Set start address and first character of the 
user-defined dot matrix 

BBAE TXT GET M TABLE Start address and first character of a user 
matrix? 

BBB1 TXT GET CONTROLS Get address of control character branch table 

BBB4 TXT STR SELECT Select text window 

BBB7 TXT SWAP STREAMS Swap over the parameters (colours, window 
limits, etc.) of two text windows 

BBBA GRA INITIALISE Complete initialisation of graphic pack 

BBBD GRA RESET Reset graphic pack 

BBCO GRA MOVE ABSOLUTE Movement to an absolute position 

BBC3 GRA MOVE RELATIVE Movement relative to the current position 

BBC6 GRA ASK CURSOR Where is current graphics cursor? 

BBC9 GRA SET ORIGIN Set origin of user coordinates 

BBCC GRA GET ORIGIN Get origin of user coordinates 

BBCF GRA WIN WIDTH Set left and right-hand limits of graphics window 

BBD2 GRA WIN HEIGHT Get upper and lower limits of graphics window 
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BBDS5 GRA GET W WIDTH Left and right-hand limits of graphics 
window? 

BBD8 GRA GET W HEIGHT Upper and lower limits of graphics window? 

BBDB GRA CLEAR WINDOW Clear graphics window 

BBDE GRA SET PEN Set printing colour 

BBE1 GRA GET PEN Which printing colour? 

BBE4 GRA SET PAPER Set background colour 

BBE7 GRA GET PAPER Which background colour? 

BBEA GRA PLOT ABSOLUTE Set graphics dots (absolute) 

BBED GRA PLOT RELATIVE Set graphics dots (relative to current 
cursor) 

BBFO GRA TEST ABSOLUTE Dot set (absolute)? 

BBF3 GRA TEST RELATIVE Dot set (relative to current cursor)? 

BBF6 GRA LINE ABSOLUTE Draw line from current to absolute position 

BBF9 GRA LINE RELATIVE Draw line from current to relative distance 

BBFC GRA WR CHAR Write a character at current graphics cursor position 

BBFF SCR INITIALISE Initialise screen pack 

BC02 SCR RESET Reset screen pack 

BCO05 SCR SET OFFSET Set start address of first character relative to base 
address of video RAM 

BC08 SCR SET BASE Set base address of the video RAM 

BCOB SCR GET LOCATION Current screen start? 

(Base + offset) 

BCOE SCR SET MODE Set screen mode 

BC11 SCR GET MODE Get and test screen mode 

BC14 SCR CLEAR Clear screen 

BC17 SCR CHAR LIMITS Get maximum number of screen lines and 
columns (mode-dependent) 

BC1A SCR CHAR POSITION Convert physical coordinates into screen 
position 

BC1D SCR DOT POSITION Determine screen position for a pixel 

BC20 SCR NEXT BYTE Move a given screen address on one character 
position 

BC23 SCR PREV BYTE Move a screen address back one position 

BC26 SCR NEXT LINE Move screen address one line on 

BC29 SCR PREV LINE Move screen address back one line 

BC2C SCR INK ENCODE Put an ink in coded form 

BC2F SCR INK DECODE Decode an ink 

BC32 SCR SET INK Assign colour(s) to an ink # 

BC35 SCR GET INK Colour(s) of an ink-#? 

BC38 SCR SET BORDER Set border colour(s) 

BC3B SCR GET BORDER Border colour(s)? 

BC3E SCR SET FLASHING Set flashing times 
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BC41 SCR GET FLASHING Flashing times? 

BC44 SCR FILL BOX Fill a given window with a colour (position 
character-related, mode dependent) 

BC47 SCR FLOOD BOX Fill given window with a colour (positions are 
screen addresses, mode independent) 

BC4A SCR CHAR INVERT Invert the foreground and background colours 
of a character 

BC4D SCR HW ROLL Screen one line up or down (in terms of hardware) 

BCS0 SCR SW ROLL Screen one line up or down (in terms of software) 

BC53 SCR UNPACK Enlarge character matrix (for mode 0/1) 

BCS6 SCR REPACK Compress character matrix back to original form 

BCS59 SCR ACCESS Set control character visible/invisible 

BCSC SCR PIXELS Set dot on screen 

BCSF SCR HORIZONTAL Draw horizontal line 

BC62 SCR VERTICAL Draw vertical line 

BC65 CAS INITIALISE Initialise cassette manager 

BC68 CAS SET SPEED Set writing speed 

BC6B CAS NOISY Cassette messages on/off 

BC6E CAS START MOTOR Start cassette motor 

BC71 CAS STOP MOTOR Stop cassette motor 

BC74 CAS RESTORE MOTOR Restore old motor condition 

BC77 CAS IN OPEN Open an input file 

BC7A CAS IN CLOSE Regular closure of an input file 

BC7D CAS IN ABANDON Close input file immediately 

BC81 CAS IN CHAR Read character (from buffer) 

BC83 CAS IN DIRECT Place entire file in memory 

BC86 CAS RETURN Last read character back into the buffer 

BC89 CAS TEST EOF End of file? 

BC8C CAS OUT OPEN Open an output file 

BC8F CAS OUT CLOSE Regular closure of an output file 

BC92 CAS OUT ABANDON Close output file immediately 

BC95 CAS OUT CHAR Write character (into buffer) 

BC98 CAS OUT DIRECT Write defined memory area to cassette (not via 
the buffer) 

BC9B CAS CATALOG Outputs a catalog of the cassette on the screen 

BC9E CAS WRITE Write block 

BCA1 CAS READ Read block 

BCA4 CAS CHECK Compare block on tape with memory contents 

BCA7 SOUND RESET Reset sound pack 

BCAA SOUND QUEUE Append tone to queue 

BCAD SOUND CHECK Still place in queue? 

BCBO SOUND ARM EVENT Put event block on "look-out" in case a place 
becomes free in the queue 
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BCB3 SOUND RELEASE Enable tones 

BCB6 SOUND HOLD Hold tones immediately 

BCB9 SOUND CONTINUE Continue processing previously held tones 

BCBC SOUND AMPL ENVELOPE Set volume envelope 

BCBF SOUND TONE ENVELOPE Set sound tone envelope 

BCC2 SOUND A ADDRESS Get address of a volume envelope 

BCC5 SOUND T ADRESS Get address of a tone envelope 

BCC8 KL CHOKE OFF Reset kernel 

BCCB KL ROM WALK Any ROM expansions? 

BCCE KL INIT BACK Add ROM expansion 

BCD1 KL LOG EXT Add resident expansion 

BCD4 KL FIND COMMAND Look for command in all added storage areas 

BCD7 KL NEW FRAME FLY Set and add event block 

BCDA KL ADD FRAME FLY Add event block 

BCDD KL DEL FRAME FLY Remove event block 

BCEO KL NEW FAST TICKER As for BCD7 

BCE3 KL ADD FAST TICKER As for BCDA 

BCE6 KL DEL FAST TICKER As for BCDD 

BCE9 KL ADD TICKER Add ticker block 

BCEC KL DEL TICKER Remove ticker block 

BCEF KL INIT EVENT Set event block 

BCF2 KL EVENT "Kick" event block 

BCF5 KL SYNC RESET Reset sync pending queue 

BCF8 KL DEL SYNCHRONOUS Delete given block from pending queue 

BCFB KL NEXT SYNC Next please 

BCFE KL DO SYNC Execute event routine 

BDO1 KL DONE SYNC Event routine completed 

BD04 KL EVENT DISABLE Disabling of normal simultaneous events. 
Express simultaneous events are not disabled. 

BD07 KL EVENT ENABLE Enable normal simultaneous events 

BDOA KL DISARM EVENT Disarm event block (counter negative) 

BDOD KL TIME PLEASE How much time has elapsed 

BD10 KL TIME SET Set time to a predetermined value 

BD13 MC BOOT PROGRAM Resets operating system and hands over 
control to a routine in (hl) 

BD16 MC START PROGRAM System initialisation and program call 

BD19 MC WAIT FLYBACK Wait for fly-back 

BDIC MC SET MODE Set screen mode 

BD1F MC SCREEN OFFSET Set screen offset 

BD22 MC CLEAR INKS Set screen edge and inks to a colour 

BD25 MC SET INKS Set colours for all inks 

BD28 MC RESET PRINTER Reset indirect branch point for printer 

BD2B MC PRINT CHAR Print character if possible 
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BD2E MC BUSY PRINTER Printer still busy? 

BD31 MC SEND PRINTER Print character (wait until it is possible) 
BD34 MC SOUND REGISTER Supply sound controller with data 
BD37 JUMP RESTORE Initialise all jump vectors 

BD3A KM SET STATE 

BD3D KM EMPTY BUFFER 

BD40 TXT CURRENT CURSOR FLAG TO ACCUMULATOR 
BD43 GRA NN 

BD46 GRA RESCUE PARAM 

BD49 GRA MASK RESCUE PARAM 

BD4C GRA MASK RESCUE PARAM 

BD4F GRA COORD Convert logical into physical coordinates 
BDS52 GRA FILL Fill routine 

BD55 SCR CHANGE SCREEN START 

BD58 MC CHARACTER ALLOCATION 


The following vectors are used by the BASIC. 


BDSB EDIT 

BDSE FLO COPY VARIABLE FROM (DE) TO (HL) 
BD61 FLO INTEGER TO FLOATING POINT 
BD64 FLO 4-BYTE VALUE TO FLO 
BD67 FLO FLO TO INT 

BD6A FLO FLO TO INT 

BD6D FLO FIX 

BD70 FLO INT 

BD73 FLO 

BD76 FLO MULTIPLY NUMBER BY 104A 
BD79 FLO ADDITION 

BD7C FLO RND 

BD7F FLO SUBTRACTION 

BD82 FLO MULTIPLICATION 

BD85 FLO DIVISION 

BD88 FLO GET LAST RND VALUE 

BD8B FLO COMPARISON 

BD8E FLO SIGN CHANGE 

BD91 FLO SGN 

BD94 FLO DEG/RAD 

BD97 FLO PI 

BD9A FLO SQR 
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BD9D FLO EXPONENTIATION 
BDAO FLO LOG 

BDA3 FLO LOG 10 

BDA6 FLO EXP 

BDA9 FLO SIN 

BDAC FLO COS 

BDAF FLO TAN 

BDB2 FLO ATN 

BDB5 FLO 4-BYTE VALUE TO FLO 
BDB8 FLO RND INIT 

BDBB FLO SET RND SEED 


This is where the so-called INDIRECTIONS begin. These are jumps to the 
operating system that are not supplied globally, but individually from each 
pack, if its RESET or INITIALISE is run. 


BDCD TXT DRAW/UNDRAW CURSOR Set/delete cursor 

BDDO TXT DRAW/UNDRAW CURSOR Set/delete cursor 

BDD3 TXT WRITE CHAR Write character on screen 

BDD6 TXT UNWRITE CHAR Read character from screen 

BDD9 TXT OUT ACTION Output character on screen or execute control 
code 

BDDC GRA PLOT Display dot on screen 

BDDF GRA TEST Give ink of current graphics position 

BDE2 GRA LINE Draw a line 

BDES5 SCR READ Read a pixel and decode the ink 

BDE8 SCR WRITE Write pixel(s) 

BDEB SCR CLEAR Clear screen 


BDEE KM TEST BREAK ESC, SHIFT and CT RL lead to a re-set of the 
entire system. 


BDF1 MC WAIT PRINTER Send a character to the printer; if it is not 
ready, wait for some time 


BDF4 KM UPDATE KEY STATE MAP 
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2.1.3. Operating System Vectors of the CPC 6128 


B900 KL U ROM ENABLE Enable current upper ROM 

B903 KL U ROM DISABLE Disable upper ROM 

B906 KL L ROM ENABLE Enable lower ROM 

B909 KL L ROM DISABLE Disable lower ROM 

B90C KL ROM RESTORE Restore old ROM configuration 

B90F KL ROM SELECT Select a given upper ROM 

B912 KL CURR SELECTION Which upper ROM is on? 

B915 KL PROBE ROM Probe ROM 

B918 KL ROM DESELECT Restore old upper ROM configuration 

B91B KL LDIR LDIR if ROM's blocked 

B91E KL LDDR LDDR if ROM's blocked 

B921 KL POLL SYNCHRONOUS Is there an event with a higher priority 
than that of the current event? 

B941 RST 7 INTERRUPT ENTRY CONT'D Entry for hardware interrupts 

B978 KL EXT INTERRUPT ENTRY 

B984 KL LOW PCHL CONT'D Jump to lower ROM or RAM 

B98A RST 1 LOW JUMP CONT'D Routine called in the operating system or 
in the RAM below it 

B9B9 KL FAR PCHL CONT'D 

B9C1 KL FAR ICALL CONT'D 

B9C7 RST 3 LOW FAR CALL CONT'D A routine can be called anywhere 
in the RAM or ROM 

BA17 KL SIDE PCHL CONT'D 

BAID RST 2 LOW SIDE CALL CONT'D Serves to call a routine in the 
expansion ROM 

BA35 RST 5 FIRM JUMP CONT'D Permits a jump to a routine in the 
operating system 

BAS1 KL L ROM ENABLE CONT'D Enable lower ROM 

BAS8 KL L ROM DISABLE CONT'D Disable lower ROM 

BASF KL U ROM ENABLE CONT'D Enable upper ROM 

BA66 KL U ROM DISABLE CONT'D Disable upper ROM 

BA70 KL ROM RESTORE CONT'D Restore old ROM configuration 

BA79 KL ROM SELECT CONT'D Select a given upper ROM 

BA7E KL PROBE ROM CONT'D Probe ROM 

BA87 KL ROM DESELECT CONT'D Restore old upper ROM 
configuration 

BA9D KL CURR SELECTION CONT'D Which upper ROM is on? 

BAA! KL LDIR CONT'D LDIR if ROM's blocked 

BAA7 KL LDDR CONT'D LDDR if ROM's blocked 

BAAD KL ROM OFF & CONFIG. SAVE 
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BAC6 RST 4 RAM LAM CONTD Read RAM contents, regardless of ROM 
status 

BAD7 KL RAM LAM (IX) Currently corresponds to a, (ix) 

BBOO KM INITIALISE Complete initialisation of keyboard management 

BBO3 KM RESET Reset keyboard management 

BB06 KM WAIT CHAR Wait for character from keyboard 

BBO9 KM READ CHAR Get character from the keyboard, if a character is 
available 

BBOC KM CHAR RETURN Deposit character in the keyboard buffer store 
for the next access 

BBOF KM SET EXPAND Set up expansion string 

BB12 KM GET EXPAND Get character from expansion string 

BB15 KM EXP BUFFER Allocate memory for expansion string 

BB18 KM WAIT KEY Wait for key depression 

BB1B KM READ KEY Get key number if a key has been depressed 

BB1E KM TEST KEY Has a key been depressed? 

BB21 KM GET STATE Get shift status 

BB24 KM GET JOYSTICK The current status of the joystick is interrogated 

BB27 KM SET TRANSLATE Make entry in keyboard table (1st. level) 

BB2A KM GET TRANSLATE Get entry from keyboard table (1st. level) 

BB2D KM SET SHIFT Make entry in keyboard table (2nd. level) 

BB30 KM GET SHIFT Get entry from keyboard table (2nd. level) 

BB33 KM SET CONTROL Make entry in keyboard table (3rd. level) 

BB36 KM GET CONTROL Get entry from keyboard table (3rd. level) 

BB39 KM SET REPEAT Set repeat function for a given key 

BB3C KM GET REPEAT Repeat function set for a given key? 

BB3F KM SET DELAY Set key repeat function and speed 

BB42 KM GET DELAY Get parameter for key repeat function and speed 

BB45 KM ARM BREAK Arm break key 

BB48 KM DISARM BREAK Disarm break key 

BB4B KM BREAK EVENT Execute routines by pressing the break key 

BB4E TXT INITIALISE Complete initialisation of the Text Pack 

BB51 TXT RESET Reset the Text Pack 

BB54 TXT VDU ENABLE Characters can be written to the screen 

BB57 TXT VDU DISABLE Disable character display 

BBSA TXT OUTPUT Display or execute (control) character 

BBS5D TXT WR CHAR Display character 

BB60 TXT RD CHAR Read character from screen 

BB63 TXT SET GRAPHIC Turn control character display on or off 

BB66 TXT WIN ENABLE Determine size of current text window 

BB69 TXT GET WINDOW What is size of current text window? 

BB6C TXT CLEAR WINDOW Clear current text window 

BB6F TXT SET COLUMN Set horizontal position of cursor 
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BB72 TXT SET ROW Set vertical position of cursor 

BB75 TXT SET CURSOR Position cursor 

BB78 TXT GET CURSOR Interrogate current cursor position 

BB7B TXT CUR ENABLE Enable cursor 

(User program) 

BB7E TXT CUR DISABLE Disable cursor 

(User program) 

BB81 TXT CUR ON Enable cursor (operating system) 

BB84 TXT CUR OFF Disable cursor (operating system, higher priority than 
BB7B TXT CUR ENABLE/BB7E TXT CUR DISABLE) 

BB87 TXT VALIDATE Cursor inside text window? 

BB8A TXT PLACE/REMOVE CURSOR Place cursor on screen/remove 
cursor from screen 

BB8D TXT PLACE/REMOVE CURSOR Set cursor on screen/remove 
cursor from screen 

BB90 TXT SET PEN Set foreground colour 

BB93 TXT GET PEN Which foreground colour? 

BB96 TXT SET PAPER Set background colour 

BB99 TXT GET PAPER Which background colour? 

BB9C TXT INVERSE Invert current foreground and background colours 

BB9F TXT SET BACK Transparent mode on/off 

BBA2 TXT GET BACK Which transparent mode? 

BBAS TXT GET MATRIX Get address of the dot matrix of a character 

BBA8 TXT SET MATRIX Set address of the (user-defined) dot matrix of a 
given character 

BBAB TXT SET M TABLE Set start address and first character of the 
user-defined dot matrix 

BBAE TXT GET M TABLE Start address and first character of a user 
matrix? 

BBB1 TXT GET CONTROLS Get address of control character branch table 

BBB4 TXT STR SELECT Select text window 

BBB7 TXT SWAP STREAMS Swap over the parameters (colours, window 
limits, etc.) of two text windows 

BBBA GRA INITIALISE Complete initialisation of graphic pack 

BBBD GRA RESET Reset graphic pack 

BBCO GRA MOVE ABSOLUTE Movement to an absolute position 

BBC3 GRA MOVE RELATIVE Movement relative to the current position 

BBC6 GRA ASK CURSOR Where is current graphics cursor? 

BBC9 GRA SET ORIGIN Set origin of user coordinates 

BBCC GRA GET ORIGIN Get origin of user coordinates 

BBCF GRA WIN WIDTH Set left and right-hand limits of graphics window 

BBD2 GRA WIN HEIGHT Get upper and lower limits of graphics window 
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BBD5 GRA GET W WIDTH Left and right-hand limits of graphics 
window? 

BBD8 GRA GET W HEIGHT Upper and lower limits of graphics window? 

BBDB GRA CLEAR WINDOW Clear graphics window 

BBDE GRA SET PEN Set printing colour 

BBE1 GRA GET PEN Which printing colour? 

BBE4 GRA SET PAPER Set background colour 

BBE7 GRA GET PAPER Which background colour? 

BBEA GRA PLOT ABSOLUTE Set graphics dots (absolute) 

BBED GRA PLOT RELATIVE Set graphics dots (relative to current 
cursor) 

BBFO GRA TEST ABSOLUTE Dot set (absolute)? 

BBF3 GRA TEST RELATIVE Dot set (relative to current cursor)? 

BBF6 GRA LINE ABSOLUTE Draw line from current to absolute position 

BBF9 GRA LINE RELATIVE Draw line from current to relative distance 

BBFC GRA WR CHAR Write a character at current graphics cursor position 

BBFF SCR INITIALISE Initialise screen pack 

BC02 SCR RESET Reset screen pack 

BCO05 SCR SET OFFSET Set start address of first character relative to base 
address of video RAM 

BCO08 SCR SET BASE Set base address of the video RAM 

BCOB SCR GET LOCATION Current screen start? 

(Base + offset) 

BCOE SCR SET MODE Set screen mode 

BC11 SCR GET MODE Get and test screen mode 

BC14 SCR CLEAR Clear screen 

BC17 SCR CHAR LIMITS Get maximum number of screen lines and 
columns (mode-dependent) 

BC1A SCR CHAR POSITION Convert physical coordinates into screen 
position 

BC1D SCR DOT POSITION Determine screen position for a pixel 

BC20 SCR NEXT BYTE Move a given screen address on one character 
position 

BC23 SCR PREV BYTE Move a screen address back one position 

BC26 SCR NEXT LINE Move screen address one line on 

BC29 SCR PREV LINE Move screen address back one line 

BC2C SCR INK ENCODE Put an ink in coded form 

BC2F SCR INK DECODE Decode an ink 

BC32 SCR SET INK Assign colour(s) to an ink # 

BC35 SCR GET INK Colour(s) of an ink #? 

BC38 SCR SET BORDER Set border colour(s) 

BC3B SCR GET BORDER Border colour(s)? 

BC3E SCR SET FLASHING Set flashing times 
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BC41 SCR GET FLASHING Flashing times? 

BC44 SCR FILL BOX Fill a given window with a colour (position 
character-related, mode dependent) 

BC47 SCR FLOOD BOX Fill given window with a colour (positions are 
screen addresses, mode independent) 

BC4A SCR CHAR INVERT Invert the foreground and background colours 
of a character 

BC4D SCR HW ROLL Screen one line up or down (in terms of hardware) 

BCS0O SCR SW ROLL Screen one line up or down (in terms of software) 

BC53 SCR UNPACK Enlarge character matrix (for mode 0/1) 

BC56 SCR REPACK Compress character matrix back to original form 

BCS59 SCR ACCESS Set control character visible/invisible 

BCSC SCR PIXELS Set dot on screen 

BCSF SCR HORIZONTAL Draw horizontal line 

BC62 SCR VERTICAL Draw vertical line 

BC65 CAS INITIALISE Initialise cassette manager 

BC68 CAS SET SPEED Set writing speed 

BC6B CAS NOISY Cassette messages on/off 

BC6E CAS START MOTOR Start cassette motor 

BC71 CAS STOP MOTOR Stop cassette motor 

BC74 CAS RESTORE MOTOR Restore old motor condition 

BC77 CAS IN OPEN Open an input file 

BC7A CAS IN CLOSE Regular closure of an input file 

BC7D CAS IN ABANDON Close input file immediately 

BC80 CAS IN CHAR Read character (from buffer) 

BC83 CAS IN DIRECT Place entire file in memory 

BC86 CAS RETURN Last read character back into the buffer 

BC89 CAS TEST EOF End of file? 

BC8C CAS OUT OPEN Open an output file 

BC8F CAS OUT CLOSE Proper closure of an output file 

BC92 CAS OUT ABANDON Close output file immediately 

BC95 CAS OUT CHAR Write character (into buffer) 

BC98 CAS OUT DIRECT Write defined memory area to cassette (not via 
the buffer) 

BC9B CAS CATALOG Outputs a catalog of the cassette on the screen 

BC9E CAS WRITE Write block 

BCAI1 CAS READ Read block 

BCA4 CAS CHECK Compare block on tape with memory contents 

BCA7 SOUND RESET Reset sound pack 

BCAA SOUND QUEUE Append tone to queue 

BCAD SOUND CHECK Still place in queue? 

BCBO SOUND ARM EVENT Put event block on "look-out" in case a place 
becomes free in the queue 
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BCB3 SOUND RELEASE Enable tones 

BCB6 SOUND HOLD Hold tones immediately 

BCB9 SOUND CONTINUE Continue processing previously held tones 

BCBC SOUND AMPL ENVELOPE Set volume envelope 

BCBF SOUND TONE ENVELOPE Set sound tone envelope 

BCC2 SOUND A ADRESS Get address of a volume envelope 

BCC5 SOUND T ADRESS Get address of a tone envelope 

BCC8 KL CHOKE OFF Reset kernel 

BCCB KL ROM WALK Any ROM expansions? 

BCCE KL INIT BACK Add ROM expansion 

BCD1 KL LOG EXT Add resident expansion 

BCD4 KL FIND COMMAND Look for command in all added storage areas 

BCD7 KL NEW FRAME ELY Set and add event block 

BCDA KL ADD FRAME FLY Add event block 

BCDD KL DEL FRAME FLY Remove event block 

BCEO KL NEW FAST TICKER As for BCD7 

BCE3 KL ADD FAST TICKER As for BCDA 

BCE6 KL DEL FAST TICKER As for BCDD 

BCE9 KL ADD TICKER Add ticker block 

BCEC KL BELL TICKER Remove ticker block 

BCEF KL INIT EVENT Set event block 

BCF2 KL EVENT "Kick" event block 

BCFS5 KL SYNC RESET Reset sync pending queue 

BCF8 KL DEL SYNCHRONOUS Delete given block from pending queue 

BCFB KL NEXT SYNC Next please 

BCFE KL DO SYNC Execute event routine 

BDO1 KL DONE SYNC Event routine completed 

BD04 KL EVENT DISABLE Disabling of normal simultaneous events. 
Express simultaneous events are not disabled. 

BDO7 KL EVENT ENABLE Enable normal simultaneous events 

BDOA KL DISARM EVENT Disarm event block (counter negative) 

BDOD KL TIME PLEASE How much time has elapsed 

BD10 KL TIME SET Set time to a predetermined value 

BD13 MC BOOT PROGRAM Resets operating system and hands over 
control to a routine in (hl) 

BD16 MC START PROGRAM System initialisation and program call 

BD19 MC WAIT FLYBACK Wait for fly-back 

BD1C MC SET MODE Set screen mode 

BD1F MC SCREEN OFFSET Set screen offset 

BD22 MC CLEAR INKS Set screen edge and inks to a colour 

BD25 MC SET INKS Set colours for all inks 

BD28 MC RESET PRINTER Reset indirect branch point for printer 

BD2B MC PRINT CHAR print character if possible 
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BD2E MC BUSY PRINTER Printer still busy? 

BD31 MC SEND PRINTER Print character (wait until it is possible) 
BD34 MC SOUND REGISTER Supply sound controller with data 
BD37 JUMP RESTORE Initialise all jump vectors 

BD3A KM SET STATE 

BD3D KM EMPTY BUFFER 

BD40 TXT CURRENT CURSOR FLAG TO ACCUMULATOR 
BD43 GRA NN 

BD46 GRA RESCUE PARAM 

BD49 GRA RESCUE MASK PARAM 

BD4C GRA RESCUE MASK PARAM 

BD4F GRA COORD Convert logical into physical coordinates 
BD52 GRA FILL 

BD55 SCR CHANGE SCREEN START 

BD58 MC CHARACTER ALLOCATION 

BDSB KL SET RAM CONFIGURATION 


BASIC Vectors 


BDSE EDIT 


BD61 FLO COPY VARIABLE FROM (DE) TO (HL) 
BD64 FLO INTEGER TO FLOATING POINT 
BD67 FLO 4-BYTE VALUE TO FLO 

BD6A FLO FLO TO INT 

BD6D FLO FLO TO INT 

BD70 FLO FIX 

BD73 FLO INT 

BD76 FLO 

BD79 FLO MULTIPLY NUMBER BY 104A 
BD7C FLO ADDITION 

BD7F FLO RND 

BD82 FLO SUBTRACTION 

BD85 FLO MULTIPLICATION 

BD88 FLO DIVISION 

BD8B FLO GET LAST RND VALUE 

BD8E FLO COMPARISON 

BD91 FLO SIGN CHANGE 

BD94 FLO SGN 

BD97 FLO DEG/RAD 
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BD9A FLO PI 

BD9D FLO SQR 

BDAO FLO EXPONENTIATION 
BDA3 FLO LOG 

BDA6 FLO LOG 10 

BDA9 FLO EXP 

BDAC FLO SIN 

BDAF FLO COS 

BDB2 FLO TAN 

BDBS5 FLO ATN 

BDB8 FLO 4-BYTE VALUE TO FLO 
BDBB FLO RND INIT 

BDBE FLO SET RND SEED 


INDIRECTIONS 


BDCD TXT DRAW/UNDRAW CURSOR Set/delete cursor 

BDDO TXT DRAW/UNDRAW CURSOR Set/delete cursor 

BDD3 TXT WRITE CHAR Write character on screen 

BDD6 TXT UNWRITE CHAR Read character from screen 

BDD9 TXT OUT ACTION Output character on screen or execute control 
code 

BDDC GRA PLOT Display dot on screen 

BDDF GRA TEST Give ink of current graphics position 

BDE2 GRA LINE Draw a line 

BDES5 SCR READ Read a pixel and decode the ink 

BDE8 SCR WRITE Write pixel(s) 

BDEB SCR CLEAR Clear screen 

BDEE KM TEST BREAK ESC, SHIFT and CTRL lead to a re-set of the 
entire system. 


BDF1 MC WAIT PRINTER Send a character to the printer; if it is not 
ready, wait for some time 


BDF4 KM UPDATE KEY STATE MAP 
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2.2 Operating System RAM 


Here, you will find a listing for that part of the operating system RAM which 
we have been able to discover the meanings of the individual addresses. 


A precondition for their use is, of course, that you should be quite clear in 
advance as to the effects of modifications. You might destroy not only 
meaningless pointers or flags but far more important things (e.g. the TEXT 
SCREEN branch table). 


2.2.1 Operating System RAM of the CPC 464 


Here you will find a listing of the operating system RAM, i.e. what we have 
been able to find out about the meanings of the individual addresses. 


You should be quite clear in advance about the results of your modifications 
since, as you can see, this is the heart of the operating system where lies not 
just flags or pointers but more critical portions such as, for example, the 
TEXT SCREEN branch table. Of course this is no doubt one reaseon for 
buying this book, in order to experiment with the operating system. But be 
careful to protect your programs; modification of the operating system 
could destroy your program. 


BO8B Basic Stack Pointer 

BO8D String Start Pointer 

BO8F String End Pointer 

BO9A Stack String Descriptor Pointer 
BO9C Stack String Descriptor 

BOBA String Descriptor 

BOC1 Variable Type 

BOC2 INT var/AdrFLOvar/Point STR desc 
B100 KL Start Int Pending Queue 
B104 KL Diff. Flags for Int. Rout. 
B105 KL sp save 

B187 KL Timer low 

B189 KL Timer high 

B18B KL Timer flag 

B18C KL Start Frame Fly Chain 
B18E KL Start Fast Ticker Chain 
B190 KL Start Ticker Chain 

B192 KL Count for Ticker 
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B193 KL Start Sync Pending Queue 
B195 KL Priority of current event 

B196 KL Order for execution 

B1A8 KL Current Exp. ROM 

B1A9 KL Entrance current ROM 

B1AB KL current ROM Configuration 
B1C8 SCR curr. Screen Mode 

B1CA SCR Screen Start Address 

B1CB SCR High Byte, Screen Start 
BICC SCR Write Indirection 

B1CF SCR Bit Masking Mode-Dependent 
B1D7 SCR Flash Periods 

B1D8 SCR Flash Period 1st. Colour 
B1D9 SCR Colour Memory 2nd. Colour 
B1EA SCR Colour Memory Ist. Colour 
B1FB SCR Flag Current Colour Set 
B1FD SCR Current Flash Period 

B1FE SCR Event Block: Set Inks 

B20C TXT Current Screen Window 
B20D TXT Start Parameters Window 0 
B21C TXT Parameters Window 1 

B22B TXT Parameters Window 2 

B23A TXT Parameters Window 3 

B249 TXT Parameters Window 4 

B258 TXT Parameters Window 5 

B267 TXT Parameters Window 6 

B276 TXT Parameters Window 7 

B285 TXT Current Cursor Pos. (Row, Col.) 
B287 TXT Window Flag (O=entire screen) 
B288 TXT Current Window Top 

B289 TXT Current Window Left 

B28A TXT Current Window Bottom 
B28B TXT Current Window Right 

B28C TXT Current Roll Count 

B28D TXT Current Cursor Flag 

B28E TXT VDU Flag (O=disabled) 

B28F TXT Current Pen 

B290 TXT Current Paper 

B291 TXT Current Background Mode 
B293 TXT Graph Char Write Mode (0=disabled) 
B294 TXT Ist. Character, User Matrix 
B296 TXT Address, User Matrix 

B2B8 TXT Character Counter Control Buffer 
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B2B9 TXT Start Control Buffer 

B2C3 TXT Branch Table Control Character 
B328 GRA X Origin 

B32A GRA Y Origin 

B32C GRA Current X Coordinate 

B32E GRA Current Y Coordinate 

B330 GRA X Coordinate GRA Window Left 
B332 GRA X Coordinate GRA Window Right 
B334 GRA Y Coordinate GRA Window Top 
B336 GRA Y Coordinate GRA Window Bottom 
B338 GRA Pen 

B339 GRA Paper 

B342 GRA Arithmetic Buffer X Coordinate 
B344 GRA Arithmetic Buffer Y Coordinate 
B4DE KM Exp. String Pointer 

B4E0 KM Put Back Buffer 

B4E1 KM Address Start Expansion Buffer 
B4E3 KM Address End Expansion Buffer 
B4ES KM Address Start free Expansion Buffer 
B4E7 KM Shift Lock State 

B4E8 KM Caps Lock State 

B4E9 KM Delay 

B4EB KM Key State Map 

B4ED KM Key 16...23 

B4F1 KM Joystick 1 

B4F4 KM Joystick 0 

B4F5 KM during Scan for Depressed Keys 
B4FF KM Miultihit Control for B4F5 

B50D KM Break Event Block 

B541 KM Address Key Translation Table 
B543 KM Address Key SHIFT Table 

B545 KM Address Key CTRL Table 

B547 KM Address of Repeat Table 

B551 SOUND Hold Sound Act. (after HOLD) 
B552 SOUND Current Sound Activity 

B555 SOUND Sound Event Block 

B55C SOUND Parameters Channel A 

B59B SOUND Parameters Channel B 

B5DA SOUND Parameters Channel C 

B60A SOUND Volume Envelopes 

B6FA SOUND Tone Envelopes 

B800 CAS Cass. Message Flag 

B802 CAS Input Buffer Status 
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B803 CAS Address Start Input Buffer 
B805 CAS Pointer Input Buffer 

B807 CAS File Header Input 

B847 CAS Output Buffer Status 

B848 CAS Address Start Output Buffer 
B84A CAS Pointer Output Buffer 
B84C CAS File Header Output 

B8D1 CAS Cass. Speed 

B8DD EDIT Insert Flag 
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2.2.2. The Operating System RAM of the CPC 664 


B82D KL Start int pending queue 
B831 KL diff. flags for int. rout. 
B832 KL sp save 

B8B4 KL timer low 

B8B6 KL timer high 

B8B8 KL timer flag 

B8B9 KL start frame fly chain 
B8BB KL start fast ticker chain 
B8BD KL start ticker chain 

B8BF KL count for ticker 

B8CO KL start sync pending queue 
B8C2 KL priority current event 
B8C3 KL order for execution 
B8DS5 KL current exp. ROM 
B8D6 KL entrance current ROM 
B8D8 KL current ROM configuration 


B7C3 SCR curr. screen mode 

B7C4 SCR position in a line 

B7C6 SCR High byte screen start 
B7C7 SCR Write indirection 

B7D2 SCR flash periods 

B7D3 SCR flash period 1st. colour 
B7D4 SCR colour memory 2nd. colour 
B7E5S SCR colour memory Ist. colour 
B7F6 SCR flag curr. colour set 

B7F8 SCR curr. flash period 

B7F9 SCR event block: Set inks 


B6B5 TXT curr. screen window 
B6B6 TXT start param's window 0 
B726 TXT curr. cursor pos (row, col.) 
B728 TXT wind. flag (O=ent. screen) 
B729 TXT curr. window top 

B72A TXT curr. window left 

B72B TXT curr. window bottom 
B72C TXT curr. window right 
B72D TXT curr. roll count 

B72E TXT curr. cursor flag 

B72F TXT curr. pen 
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B730 TXT curr. paper 

B731 TXT curr. background mode 

B733 TXT graph char write mode (O=disable) 
B734 TXT lst. character, user matrix 

B736 TXT addr. user matrix 

B758 TXT character counter control buffer 
B759 TXT start control buffer 

B763 TXT branch table control character 


B693 GRA X origin 

B695 GRA Y origin 

B697 GRA curr. X coord. 

B699 GRA curr. Y coord. 

B69B GRA X coord. GRA window left 
B69D GRA X coord. GRA window right 
B69F GRA Y coord. GRA window top 
B6A1 GRA Y coord. GRA window bottom 
B6A3 GRA pen 

B6A4 GRA paper 

B6A5 GRA arithmetic buffer X coordinate 
B6A7 GRA arithmetic buffer Y coordinate 


B628 KM Exp. string pointer 

B62A KM put back buffer 

B62B KM addr. start exp. buffer 
B62D KM addr. end exp. buffer 
B62F KM addr. start free exp. buffer 
B631 KM shift lock state 

B632 KM caps lock state 

B633 KM delay 

B635 KM key state map 

B637 KM key 16...23 

B62B KM joystick 1 

B63E KM joystick 0 

B63F KM during scan depressed keys 
B649 KM multihit contr. for B63F 
B657 KM break event block 

B68B KM addr. key translation table 
B68D KM addr. key SHIFT table 
B68F KM addr. key CTRL table 
B691 KM addr. of repeat table 


B1ED SOUND old sound act. (after HOLD) 
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B1EE SOUND curr. sound activity 
B1F8 SOUND param's. channel A 
B237. SOUND param's. channel B 
B276 SOUND param's. channel C 
B2A6 SOUND volume envelopes 
B396 SOUND tone envelopes 


B118 CAS cass. message flag 
B11A CAS input buffer status 
B11B CAS addr. start input buffer 
B11D CAS pointer input buffer 
B11F CAS file header input 

B1SF CAS output buffer status 
B160 CAS addr. start output buffer 
B162 CAS pointer output buffer 
B164 CAS file header output 

B1E9 CAS cass. speed 


B115 EDIT insert flag 
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2.2.3. The Operating System RAM of the CPC 6128 


B82D KL Start int pending queue 
B831 KL diff. flags for int. rout. 
B832 KL sp save 

B8B4 KL timer low 

B8B5 KL curr. RAM configuration 
B8B6 KL timer high 

B8B8 KL timer flag 

B8B9 KL start frame fly chain 
B8BB KL start fast ticker chain 
B8BD KL start ticker chain 

B8BF KL count for ticker 

B8CO KL start sync pending queue 
B8C2 KL priority current event 
B8C3 KL order for execution 
B8D6 KL current exp. ROM 

B8D7 KL entrance current ROM 
B8D9 KL current ROM configuration 


B7C3 SCR curr. screen mode 

B7C4 SCR position in a line 

B7C6 SCR High byte screen start 
B7C7 SCR Write indirection 

B7D2 SCR flash periods 

B7D3 SCR flash period 1st. colour 
B7D4 SCR colour memory 2nd. colour 
B7E5 SCR colour memory 1st. colour 
B7F6 SCR flag curr. colour set 

B7F8 SCR curr. flash period 

B7F9 SCR event block: Set inks 


B6B5 TXT curr. screen window 

B6B6 TXT start param's window 0 
B726 TXT curr. cursor pos (row, col.) 
B728 TXT wind. flag (O=ent. screen) 
B729 TXT curr. window top 

B72A TXT curr. window left 

B72B TXT curr. window bottom 
B72C TXT curr. window right 

B72D TXT curr. roll count 

B72E TXT curr. cursor flag 
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B72F TXT curr. pen 

B730 TXT curr. paper 

B731 TXT curr. background mode 

B733 TXT graph char write mode (0=disable) 
B734 TXT 1st. character, user matrix 

B736 TXT addr. user matrix 

B758 TXT character counter control buffer 
B759 TXT start control buffer 

B763 TXT branch table control character 


B693 GRA X origin 

B695 GRA Y origin 

B697 GRA curr. X coord. 

B699 GRA curr. Y coord. 

B69B GRA X coord. GRA window left 
B69D GRA X coord. GRA window right 
B69F GRA Y coord. GRA window top 
B6A1 GRA Y coord. GRA window bottom 
B6A3 GRA pen 

B6A4 GRA paper 

B6A5 GRA arithmetic buffer X coordinates 
B6A7 GRA arithmetic buffer Y coordinates 


B628 KM Exp. string pointer 

B62A KM put back buffer 

B62B KM addr. start exp. buffer 
B62D KM addr. end exp. buffer 
B62F KM addr. start free exp. buffer 
B631 KM shift lock state 

B632 KM caps lock state 

B633 KM delay 

B635 KM key state map 

B637 KM key 16...23 

B62B KM joystick 1 

B63E KM joystick 0 

B63F KM during scan depressed keys 
B649 KM multihit contr. for B63F 
B657 KM break event block 

B68B KM addr. key translation table 
B68D KM addr. key SHIFT table 
B68F KM addr. key CTRL table 
B691 KM addr. of repeat table 
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B1ED SOUND old sound act. (after HOLD) 
B1EE SOUND curr. sound activity 

B1F8 SOUND param's. channel A 

B237 SOUND param's. channel B 

B276 SOUND param's. channel C 

B2A6 SOUND volume envelopes 

B396 SOUND tone envelopes 


B118 CAS cass. message flag 
B11A CAS input buffer status 
B11B CAS addr. start input buffer 
B11D CAS pointer input buffer 
B11F CAS file header input 

B15F CAS output buffer status 
B160 CAS addr. start output buffer 
B162 CAS pointer output buffer 
B164 CAS file header output 

B1E9 CAS cass. speed 


B115 EDIT insert flag 
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2.3 How to use the Operating System Routines 


The CPC contains several hundred routines or functions that are highly 
appropriate and useful for the programmer. For instance, there are routines 
for scanning the keyboard, outputting a character on the screen, window 
control or printer operation. 


Despite the abundance of functions available in the operating system, there 
are some things that the CPC cannot do from scratch. For example, there is 
no provision for printing out the contents of the screen, text or graphics, on 
an associated printer. 


We shall be taking two examples to illustrate this capability known as ' hard 
copy '. The first example concerns a hard copy of text only, which works 
with any associated printer, while the second hard copy routine makes it 
possible to print out all characters, including the CPC graphics characters. 
Even figures generated with high resolution graphics can be printed out 
using this routine. The printer that we chose was the NLQ 401. This 
reasonably priced printer is surprisingly compatible, as regards its 
repertoire of control symbols, with the Epson MX/RX/FX printers. As a 
result, both programs can be run using the above Epson printers (and any 
others that are compatible) without any need for adaptation. 


At the end of this chapter, not only will you have two fast hard copy routines, 
but you will also have gained some ideas of how to use your own operating 
system routines. 


To be able to print out the contents of the screen using an associated printer, 
the characters have to be read and printed line by line from the screen. 
Unfortunately, owing to the special arrangement of the video RAM, the 
characters cannot be read out directly. 


However, a round-about solution involving the use of an operating system 
routine can be used to determine the character at the current cursor position. 
This routine ( TXT RD CHAR,&BB60 ) transmits the character in the 
accumulator and sets the carry flag, if a character has been found. On the 
other hand, if there is no character from the CPC repertoire at the cursor 
position, the accumulator contains a zero and the carry flag is reset. 


In addition, we need a routine to position the cursor for us so that we can 


read the characters one after the other. This function is performed by TXT 
SET CURSOR,&BB75 . If this address is called, the contents of the H 
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register are interpreted as a column, while the contents of L are interpreted 
as a line. The upper left-hand printing position is addressable via &0101. 


However, we encounter a small problem at this point. After we have scanned 
the entire screen with the cursor, it should be returned to its original 
position. To achieve this, we have to determine and note the location of the 
cursor before the first positioning operation. 


This can be done using TXT GET CURSOR,&BB78 . After calling TXT 
GET CURSOR, the HL register pair contains the current cursor position. 
We have to note this value and restore it after completion of the hard copy. 


The characters obtained using TXT RD CHAR have to be output to the 
printer. For this purpose, we use MC SEND PRINTER with an entry at 
&BD31. The character in the accumulator is output to the printer port with 
all the necessary handshake signals. 


Naturally, MC SEND PRINTER waits for the printer to be ready to receive. 
This is determined for us by MC BUSY PRINTER,&BD2E . If the printer is 
not ready to receive, not turned on or not connected, MC BUSY PRINTER 
returns with the carry flag set. In this case, the routine has to be called until 
the carry flag is reset. The desired character can then be output. 


However, we may not wish to print out an already enabled hard copy in full. 
The process can be interrupted by depressing the "DEL" key. But we need to 
be able to determine whether this key has been pressed. If KM TEST 
KEY,&BBIE is called with a valid key code in the accumulator, the zero flag 
is reset after the return if the corresponding key is depressed. Otherwise, the 
zero flag is set. 


This actually gives us all the system routines that we need in order to write a 
hard copy routine. However, you will notice that, while we are writing this 
routine, we will not know whether the routine is to be printing 20, 40 or 
even 80 characters per line. We could say this is only in screen mode X, but 
that would be an unseemly restriction. 


SCR GET MODE with an entry at &BC11 informs us in the accumulator and 
in the two flags, Carry and Zero, of the CPC's current screen display mode. 
In this way, we can produce a hard copy with the required number of 
characters. 


But now, let us turn to the program itself. Those readers who do not have 
assemblers can use the BASIC program given at the end of this chapter. It 
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contains both hard copy programs in program data lines. 


A100 
A103 
A106 
A109 
A10A 
A10D 
A110 
A113 
A116 
A117 
A119 
AllA 
A11B 
A11E 
AllF 
A122 
A123 
A125 
A127 
Al2A 
A12B 
A12C 
A12E 
Al31 
A132 
A133 
A135 
A136 
A137 
A139 
A13B 
A13D 
A140 


BB78 
BB75 
BB60 
BD2E 
BD31 
BC11 
BBIE 


CD78BB 
2264A1 
CD11BC 
17 
3263A1 
210101 
2266A1 
3A63A1 
47 

0E14 

CS 

ES 
CD75BB 
El 
CD60BB 
Cl 

3802 
3E20 
CDS8A1 
E5 

CS 

3E42 
CD1EBB 
Cl 

El 

201C J 
24 

0D 

20E0 
10DC 
3E0D 
CD58A1 
3E0A 


GETCRS EQU 
SETCRS EQU 
RDCHAR EQU 
TSTPTR EQU 
PRTCHR EQU 
GETMOD EQU 
TSTKEY EQU 


CALL GETCRS 
LD (OLDPOS),HL 
CALL GETMOD 
RLA 

LD (MODE),A 
LD HL,#0101 

LD (CRSPOS),HL 
LL1 LD A,(MODE) 
LD B,A 

LOOP LD C,20 
LLOOP PUSH BC 
PUSH HL 

CALL SETCRS 
POP HL 

CALL RDCHAR 
POPBC_ ; 

JR C,GOOD 

LD A,32 


#BB78 
#BB75 
#BB60 
#BB2E 
#BD31 
#BC11 
#BBIE 


;note previous cursor position 


get screen mode 

snumber of characters/20 
sand save 

;the cursor 

;in the top left-hand corner 


31, 2 or 4 times 
;20 characters per line 


;place cursor 


sand determine 
the character 
;valid character? 
otherwise output 


GOOD CALL PRTOUT ;blank character 


PUSH HL 

PUSH BC 

LD A,66 

CALL TSTKEY 
POP BC 

POP HL 

R NZ,EXIT 
INCH 

DEC C 

JR NZ,LLOOP 
DJNZ LOOP 
LD A,#0D 
CALL PRTOUT 
LD A,#0A 


;ESC depressed? 


;if so, end 


;20 characters printed? 
sentire line? 
;output CR/LF 
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A142 CDS8A1 CALL PRTOUT 


A145 2A66Al1 LDHL,(CRSPOS) ;determine 

Al48 2C INCL cursor pos. for 
A149 2266A1 LD (CRSPOS),HL next row 

Al4C 7D LD A,L 

Al4D FEIA CP 26 ;25 lines printed? 


Al4F 20C2 JR NZ,LL1 

Al51 2A64A1 EXIT LDHL,(OLDPOS) ;if so, restore 

A154 CD75BB CALL SETCRS ;previous cursor position 
A157 C9 RET sand return 

A159 CD2EBD PRTOUT PUSH BC 

Al15C 38FB JRC,P1 


A15E CD31BD CALL PRTCHR ;output character 
Al6l_ Cl POP BC 

Al62 C9 RET 

A163 00 MODE DEFB 0 

A164 0000 OLDPOS DEFW 0000 

A166 0000 CRSPOS DEFW 0000 


The notes in the listing should make the program easy to understand. The 
only peculiarity is the method used to calculate the number of output 
characters per line. We shall therefore discuss this briefly. 


After the SCR GET MODE call, the accumulator contains 0, 1 or 2, 
depending on the mode. In addition, the conditions of the carry and zero 
flags are as follows: 


Mode 0 = Carry 1, Zero 0 
Mode 1 = Carry 0, Zero 1 
Mode 2 = Carry 0, Zero 0 


The contents of the accumulator are shifted one bit to the left by the SLA 
command. This corresponds to multiplying by two. In addition, the 
condition of the carry flag is transferred to bit 0 in the accumulator, which 
has become free, while "dropped out" bit 7 is transferred to the Carry. 


In mode 0, the 0 in the accumulator is rotated. This has no effect on the 
contents of the accumulator. As, however, the carry flag set by SCR GET 
MODE is transferred to bit 0 in the accumulator, the accumulator contains a 
1 after this command. As a result of this 1, 20 characters are printed per line. 


In mode 1, the accumulator contains a 1; the carry is reset in this mode. After 
command SLA, the accumulator contains a 2. In this way, 2 times 20 
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characters are output per line. There is an analogous situation in mode 2. 
Because of the SLA command, the accumulator of course contains a 4, which 
results in 4 times 20 characters per print line. 


The position is somewhat different when it comes to generating a graphics 
hard copy. Here, routines TXT SET CURSOR and TXT RD CHAR cannot 
help us any further. 


The first step is to turn on the graphics mode using GRA INITIALISE . We 
then use GRA GET PAPER to determine the colour number of the 
background. 


All the dots on the screen are compared with this value. If the colour of a 
pixel differs from the background, a dot is generated on the paper. 


Unfortunately, the CPC has only a 7-bit printer interface which causes 
certain complications. 


In the first place, this means that we can output to the printer in a single 
operation 7 dots arranged one below the other. In all, the CPC graphics give 
a vertical resolution of 200 dots. But these cannot be divided by 7 without a 
remainder. We get a remainder, i.e. pixel rows left over, which have to be 
treated separately. On the other hand, there is no problem with different text 
modes. 


Another problem with the 7-bit output concerns the transmission of 
commands to the printer. When the graphics are enabled using ESC L, we 
need an indication for the available 640 pixels per line which cannot be 
transmitted with the CPC. 


In order to obtain the required number of graphics dots on the printer, the 
control sequence is as follows: 


PRINT #8,CHR$(27);"L";CHR$(128)CHR$(2) 


The problem lies with the value 128. In binary notation, 128 is a value with a 
set eighth bit. All the other bits are zero. If we were to send this value to the 
printer, it would only receive a zero since the eighth bit is, of course, used as 
a strobe signal and is not output to the printer. 


We bypass this problem by the rather crude method of ouputting only 639 


dots horizontally. This is, of course, one dot less than available on the screen 
but the first value for transmission is thereby reduced to 127. 
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Before we come to the listing of the graphics hard copy routine, we must 
point out one further detail. 


Although, physically, the screen displays only 200 raster lines, all the CPC's 
graphics routines are calculated on the basis of a vertical resolution of 400 
dots. This makes for a much better X to Y ratio than if calculations were 
simply based on the 200 lines actually available. The result is easy to see if 
you try out the circle drawing program reproduced in the CPC BASIC 
handbook. The circle is actually (almost) round. Without this correction, 
you would get an ellipse lying on its side. 


The correction also has to be reflected on our hard copy, but, of course, 
precisely the other way round. We also determine the graphics coordinates 
using a 400x640 dot raster but output only 200 dots vertically to the printer 
in order to minimize distortion. 


A000 ORG #A000 

BBBA GRINIT EQU #BBBA 
BBE7 GETPAP EQU #BBE7 
BBFO TSTPOI EQU #BBE7 
BD2B PRINTO EQU #BD2B 
BD2E TSTPTR EQU #BD2E 
BBIE TSTKEY EQU #BBI1E 

A000 CDBABB CALL GRINIT enable graphics mode 


A003 CDE7BB CALL GETPAPER ;define background colour 
A006 32BDAO LD (PAPER),A 


A009 CD6CAO CALL INITP ;Set printer to 7/72 inch 
AQOC 218F01 LD HL,399 ;Start printing 

AOOF 22BEAO0 LD (Y-MARK),HL 

A012 110000 LD DE,O stop left 

A015  3E07 LD A,7 


A017. 32C0OA0 LD(NUMBER),A 
A01A CD7CAO LLOOP CALL PRTESC;ESC sequence for graphics 
A01D_ OE00 LL1 LDC,O ;C contains bit pattern 
;for printer 
AO1IF 3ACOAO0 LD A,(NUMBER) 


A022 47 LD B,A ;B=dot row counter 
A023 —sCiES BYTLP PUSH HL 

A024 D5 PUSH DE 

A025. C5 PUSH BC 


A026 CDFOBB CALL TSTPOINT ;define colour of pixel at 
;the position (hl/de) 
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A029 Cl POP BC 

A02A DI POP DE 

A02B 21BDAO LDHL,PAPER 

AO2E BE CP (HL) ;pixel col=background col? 
A02F_ El POP HL 

A030 = 37 SCF ;if pixel <> paper, then set 
A031 2001 JR NZ,DOT scarry flag, otherwise 
A033 A7 AND A sreset carry 

A034 —-CB11 DOT RLC ;displace carry to the lo bit 
A036 2B DEC HL ;in the C register 

A037 2B DEC HL shl=hl-2, next dot 

A038  10E9 DJNZ BYTLP ;doing everything 7 times 
A03A CDAFAO CALL TEST ;transfer special treatment of 
A03D 79 LDA,C ;the last bit pattern to the 
A03E CDA6A0_ CALL PRINT ;accumulator and print 
A041 = 13 INC DE 

A042 ——~ES PUSH HL 

A043 -.217F02 LD HL,639 jline printed? 

A046 37 SCF 

A047. ED52 SBC HL,DE 

A049 El POP HL 

A04A 3805 JR LL1 

A051 23 NXTROW INC HL ;special treatment of 
A052. 7C LD A,H slast 4 

A053 BS ORL 

A054 C8 RET Z 

A055 2B DEC HL 

A056 110000 LD DE,0 ;preparation of next 
A059 22BEAO LD (Y-MARK),HL sprint line 

AOSC 3E07 LD A,7 

AOSE BD CPL slast row of 7's? 

AOSF 20B9 JR NZ,LLOOP 

A061 7C LD A,H 

A062 =B4 ORH 

A063 20B5 JR NZ,LLOOP 

A065 3E04 LDA,4 ;then just 4 more rows 
A067. +32COAO LD(NUMBER),A 

A06A_ 18AE JR LLOOP 

A06C 3E1B INITP LD A,27 for NLQ/MX/RX/FX 
A06E CDA6A0 CALL PRINT ;ESC A7, to get the 

A071 3E41 LD A,65 scorrect line feed 

A073, CDA6A0_ CALL PRINT 

A076 =3E07 LD A,7 
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A078 
A07B 
A07C 
A07D 
AO7F 
A082 
A083 
A085 
A086 
A087 
A089 
A08C 
AO8E 
A091 
A093 
A096 
A098 
A09B 
A09D 
AOAO 
A0A2 
AOA5 
A0A6 
AOA9 
AOAB 
AOAE 
AOAF 
A0B2 
AOB4 
AOBS 
AOB6 
AOB8 
AOBA 
AOBC 
AOBD 
AOBE 
A0CO 


CDA6A0 
C9 

ES 

3E42 
CD1EBB 
El 

2802 

El 

C9 

3E0D 
CDA6A0 
3E0A 
CDA6A0 
3E1B 
CDA6A0 
3E4C 
CDA6A0 
3E7F 
CDA6A0 
3E02_— 
CDA6A0 
C9 
CD2EBD 
38FB 
CD2BBD 
C9 
3ACOA0 
FEO7 

C8 

AF 


‘CBI1 
‘CBI1 


CB11 
C9 
00 
0000 
00 
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CALL PRINT 

RET 

PRTESC PUSH HL ;DEL key pressed? 
LD A,66 sif so, interrupt HC 
CALL TSTKEY 

POP HL 

JR Z,NOKEY ;DEL was not depressed 
POP HL 

RET 

NOKEY LD A,#0D ;output CR/LF 
CALL PRINT 

LD A,10 

CALL PRINT 

LD A,27 sESC L 127 2=graphics 
CALL PRINT swith 639 dots 

LD A,76 

CALL PRINT 

LD A,127 

CALL PRINT 

LD A,2 

CALL PRINT 

RET 

PRINT CALL TSTPTR printer busy? 

JR C,PRINT 

CALL PRINTOUT sprint character 
RET 

TEST LD A,(NUMBER);treatment of the last 
CP 7 ;four rows of dots 
RET Z 

XORA 

RLC sshift 0 three times 
RLC ;via carry to the C reg 
RLC 

RET 

PAPER DEFB 0 

Y-MARK DEFW 0000 

NUMBER DEFB 0 
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Finally, we come to the promised BASIC loader. This will enable you to use 
the program even if you do not have a monitor or assembler. 


100 REM Graphics hard copy for CPC with NLQ/MX/RX/FX 
110 REM Hard copy is called using 'CALL &A000' 
120 REM Text hard copy for the CPC 

130 REM Hard copy is called using ‘CALL &A100' 
140 FOR i=&A000 TO &AOBF 

150 READ byte:POKE i,byte:s=st+byte:NEXT 

160 DATA &cd,&ba,&bb,&cd,&e7,&bb,&32,&bd 
165 DATA &a0,&cd,&6c,&a0,&21,&8f,&01,&22 
170 DATA &be,&a0,&11,&00,&00,&3e,8&07,&32 
175 DATA &c0,&a0,&cd,&7c,&a0,&0e,8&00,8&3a 
180 DATA &c0,&a0,&47,&e5,&d5,&c5,&cd,&f0 
185 DATA &bb,&c1,&d1,&21,&bd,&a0,&be,&el 
190 DATA &37,&20,&01,&a7,&cb,&11,&2b,&2b 
195 DATA &10,&e9,&cd,&af,&a0,8&79,&cd,&a6 
200 DATA &a0,&13,&e5,&21,&7f,&02,&37 ,&ed 
205 DATA &52,&e1,&38,&05,&2a,&be,&a0,&18 
210 DATA &cc,&23,&7c,&b5,&c8,&2b,&11,&00 
215 DATA &00,&22,&be,&a0,&3e,&07,&bd,&20 
220 DATA &b9,&7c,&b4,&20,&b5,&3e,&04,&32 
225 DATA &c0,&a0,&18,&ae,&3e,&1b,&cd,&a6 
230 DATA &a0,&3e,&31,&cd,&a6,&a0,&00,&00 
235 DATA &00,&00,&00,&c9,&e5,&3e,&42,&cd 
240 DATA &1le,&bb,&e1,&28,&02,&e1,&c9,&3e 
245 DATA &0d,&cd,&a6,&a0,&3e,&0a,&cd,&a6 
250 DATA &a0,&3e,&1b,&cd,&a6,&a0,&3e,&4c 
255 DATA &cd,&a6,&a0,&3e,&7f,&cd,&a6,&a0 
260 DATA &3e,&02,&cd,&a6,&a0,&c9,&cd,&2e 
265 DATA &bd,&38,&fb,&cd,&2b,&bd,&c9,&3a 
270 DATA &c0,&a0,&fe,&07 ,&c8,&af,&cb,&11 
275 DATA &cb,&11,&cb,&11,&c9,&00,8&00,8&00 
280 IF s<>23151 THEN PRINT "error in graphics-hc":END 
290 PRINT "graphics-he correct to load” 

300 s=0:FOR i=&A100 TO &A162 

310 READ byte:POKE i,byte:s=s+byte:NEXT 

320 DATA &cd,&78,&bb,&22,&64,&al ,&cd,&11 
325 DATA &bc,&17,&32,&63,&al,&21,&01,&01 
330 DATA &22,&66,&a1,&3a,&63,&a1,&47,&0e 
335 DATA &14,&c5,&e5,&cd,&75,&bb,&el ,&cd 
340 DATA &60,&bb,&c1,&38,&02,&3e,&20,&cd 
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345 DATA &58,&al ,&e5,&c5,&3e,&42,&cd,&le 
350 DATA &bb,&cl1,&e1 ,&20,&1c,&24,&0d,&20 
355 DATA &e0,&10,&dc,&3e,&0d,&cd,&58,&al 

360 DATA &3e,&0a,&cd,&58,&al ,&2a,&66,&al 

365 DATA &2c,&22,&66,&al,&7d,&fe,&1la,&20 
370 DATA &c2,&2a,&64,&al ,&cd,&75,&bb,&c9 
375 DATA &c5,&cd,&2e,&bd,&38,&fb,&cd,&31 

380 DATA &bd,&cl,&c9 

390 IF s<>11873 THEN PRINT "error in text-hc":END 
400 PRINT "text-hc correct to load" 
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2.4 How to Use Operating System Interrupts 


Probably the fastest and most efficient way of reacting to certain events 
within an operating system is to use the Interrupt technique. An Interrupt is, 
as a rule, a hardware event that informs the current program of its 
occurrence. In consequence of this event, the software then has to perform 
associated actions, and perform them as swiftly as possible, according to 
their urgency. One example of such activities is the scrolling of the screen 
during the "dark phase" of the electron beam, so that the observer perceives 
as little as flicker as possible. This interrupt technique has the advantage of 
suspending program flow only when some essential action is really required, 
thus sparing the software the trouble of continuously checking to see whether 
something has happened or not. 


By the very nature of things, there are many ways of incorporating this kind 
of capability in an operating system (some people are spiteful enough to say 
that there are as many ways as there are programmers), but we have to admit 
that this is the first time that we have come across the kind of variant that the 
CPC 464 gives us. 


Here, we have a refined mix of hardware interrupt (interrupt when 
required) and polling (regular checking to see what is happening). The 
urgency of a "request" is decided by the programmer of the routine 
concerned. In plain language: There is only one single interrupt in the 
machine, and that is the timer (known in the system as the "fast ticker") 
which generates an interrupt every 1/300 seconds. Everything else follows 
on from this, as you will see. 


It is time now to introduce a couple of new terms which you will encounter 
in this section as well as in the ROM listing. 


1. EVENT quite simply means what it says. Consider it in this context as a 
kind of software-controlled interrupt. 


2. FRAME FLYBACK is nothing other than the above-mentioned beam 
flyback of the screen, which occurs every 1/50 seconds. 


3. TICKER is a multiple of the "fast ticker", and also occurs every 1/50 
seconds. 


All this is simply arranged so that it is the programmer, i.e. yourself among 
others, who decides which routines in his program have to be entered, and 
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how often, at the moment of frame flyback, ticker or even fast ticker, 
automatically in fact, without any need for further action on his part. 


All the operating system needs in advance is the address of the routine(s), 
plus several parameters. These parameters are provided as an EVENT 
BLOCK. This indicates when and how often the routine is to be called, 
whether it is to be called before other routines (priority control) or whether 
there is no hurry, etc. 


At every occurrence of ticker, fast ticker or framefly, the operating system 
checks to see whether there are any corresponding event blocks. If so, there 
are called according to their order of priority. Certain event blocks, in fact, 
recurr constantly, e.g. the action of supplying the colour register at frame 
flyback. 


The blocks associated with a given event are interlinked by means of pointers 
so that the operating system can work its way from one to the other. As a 
result, the address at which such a block is located is of no importance as long 
as it is within the central 32K of RAM. This minor restriction is necessary 
because it is the only range that can be accessed at any time, regardless of the 
rest of the ROM configuration. If such a block is to be executed, it is placed 
in another queue, the so-called Pending Queue. This process is known as 
kicking. The Pending Queue is worked through at the end of the system's 
own Interrupt routine. 


Interrupts can also occur via the expansion bus (asynchronously), and with 
the aid of a suitable routine the event block can be "kicked", or added to the 
Pending Queue. 


What do you have to do to use this mechanism? First of all, of course, an 
event block has to be provided, as outlined below. All types of event block 
have the following in common: 


Byte 0+1 
Link address for the Pending Queue. This field can only be supplied by the 
operating system! 


Byte 2 Counter 

As long as the counter >0, the block remains in the Pending Queue, i.e. the 
routine is run until the counter=0. If the counter<0 (i.e. >127), the block 
remains in the corresponding string (ticker, etc.). Even a "kick" will not, in 
this case, cause the routine to run, which would, apart from that, have the 
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effect of implementing the counter which would result, in turn, in a jump to 
the next event. 


Byte 3 Class 

Bit 0 = 1 = the jump address concerned is a near address, i.e. it is located in 
the central ROM, or lower ROM. 

BitO = O = this jump address is a far address, i.e. to be found in the upper 
ROM. 

Bits 1-4 define the order of priority. 

BitS must always = 01 

Bit6 = 1 = Express. Express events take a higher priority than normal events 
of the highest priority. 

Bit7 = 1 = Asynchronous Event. These events have no queue and are 
immediately placed in the Interrupt Pending Queue by "kicking" (KL 
event). If it is an express event as well, it will be handled on the spot, 
otherwise at the end of the interrupt routine. NB: the routine for 
asynchronous express events must be located in the central RAM1 


Byte 4+5 Address of the routine. 
Byte 6 ROM Select if the jump address if of the Far type, otherwise spare. 


Byte 7 This is the start of the user field, which can be of any length. It can be 
used to transmit parameters to the routine. At the start of an event routine, hl 
contains the address of byte 5 of the event block, in the case of a near address; 
otherwise, it contains the address of byte 6. 


This makes it possible to provide several blocks for the same routine, which 
can tell from the parameters which block has called it. 


Depending on the type of event, i.e. Ticker, Fast Ticker or Frame Fly, two 
or six further bytes are prefixed to the common part. In the case of Fast 
Ticker and Frame Fly, there are only two bytes for the string (not to be 
altered!) in the Fast Ticker list or Frame Fly list. The six bytes for the Ticker 
have the following meanings: 


Byte 0+1 String for Ticker List (not to be altered!) 

Byte 2+3 Tick Count defines how often a Ticker must occur before the block 
is "kicked". 

Byte 4+5 Reload Counter gives the value with which Tick Count is to be 
re-loaded after running. 


And so, after you have supplied your block with the values, when you know 
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them, (these should be at least the last 5 bytes (Event Count=0) of the 
common part), all you have to do is load hl again with the starting address of 
your block (in the case of Ticker, the Tick Count should still come to DE and 
the Reload Count to BC) and then start the KL ADD TICKER, KL ADD 
FAST TICKER or KL ADD FRAME FLY routine as appropriate. 


To remove the block from the list, you use routines KL DEL TICKER, etc., 
for which purpose HL must once again contain the address, this time the 
address of the block to be removed. 


Recurring processes use the same technique. 
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2.5 The Operating System ROM 


You will certainly have noticed, from the lists of operating system vectors 
(Chapter 2.1) and of the operating system RAM's (Chapter 2.2) that the 
differences between the CPC 464, the CPC 664 and CPC 6128 are very 
slight. And so, to avoid wasting time and paper, we have decided to discuss 
the operating system with special reference to the CPC 6128. This does not 
mean that all CPC 464/664 users can now close the book and put it back on 
the shelf; they should simply stay on the lookout to see whether the comments 
correspond precisely to their ROM listing or whether the addresses have 
moved a couple of bytes or so. As you are sufficiently at home with machine 
language to know how to set up your experiments with the operating system, 
you should not find this transposition too difficult. However, if you are not 
yet confident, you should use only the vectors. 


Below you will find a number of comments on the operating system of the 
CPC 6128. Taken in isolation, these comments do not tell us very much; 
however, if you generate yourself a listing of the ROM range for 
examination, with the help of the DISASSEMBLER in the Annex to this 
book, and then compare the addresses in the listing with those of the 
comments, you will find that the two combine to form a meaningful whole. 


This type of commentary on operating systems will probably become 
common practice as these patterns become increasingly complex, if one 
wishes to describe the operating system as a whole and not simply shed light 
on certain areas. 


2.5.1 Kernel (KL) 

The Kernel, as its name suggests is the primary control, and is responsible 
for job sequencing (i.e. the handling of interrupts and associated events), 
restart processing , adding ROM expansions and switching over between 


memory configurations. 


The routines associated with the event mechanism may be of interest to the 
user. 


After system switch-on, the processor begins here to run the program. When 
RST 0 is called, this results in complete system reset. 
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0000 U ROM disable, mode 1, reset divider 
0005 Reset cont'd 


Serves to call a routine in the operating system or in the RAM below. The 
address of the routine to be called must be located directly after the RST 
command. As 14 address bits are sufficient for the &0000 to &3FFF range, 
bits 14 and 15 are used to select ROM or RAM. Set bit 15 causes a selection to 
be made in the &C000 to &FFFF address range of the RAM, while the 
operating system is selected by means of reset bit 14. 


0008 (0430) RST 1 LOW JUMP CONT'D 
000B (042A) KL LOW PCHL CONT'D 
OOOE Manipulate return address 

OOOF Corresponds to jp (bc) 


Serves to call a routine in an expansion ROM. RST 2 is used if a program 
connected as a ROM expansion requires more than 16K. 


0010 (04C3) RST 2 LOW SIDE CALL CONT'D 
0013 (04BD) KL SIDE PCHL CONT'D 

0016 Manipulate return address 

0017 Corresponds to jp (de) 


A routine can be called anywhere in the ROM or RAM. For this purpose, the 
RST 3 command must be followed by the two-byte address of a parameter 
block (three bytes long). The first two bytes of the parameter block contain 
the address of the routine to be called. The third byte indicates the 
ROM/RAM status. 


0018 (046D) RST 3 LOW FAR CALL CONT'D 
001B (045F) KL FAR PCHL CONT'D 


With the RST 4, you can read the contents of the RAM from a machine 


language program, in which case the selected ROM status is of no 
importance. The RST 4 command practically speaking replaces LDA,(HL); 
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for this purpose, hl must contain the address of the memory location to be 
read. 


0020 (056C) RST 4 RAM LAM CONT'D 
0023 (0467) KL FAR ICALL CONT'D 


Permits a jump to a routine in the operating system. The corresponding 
entrance address must follow the RST 5 command immediately. Before the 
jump to the desired routine takes place, the operating system ROM is selected 
and then turned off again after leaving the routine. 

0028 (04DB) RST 5 FIRM JUMP CONT'D 


Bytes &0030 to &0037 are available to the user. At system power- up, there 
is a pre-set RST 0. 


0030 RST 0 to high kernel restore 
DOSS MRE RA Ree STEREO RST FINTERRUE LT ENTRY 
Entrance for hardware interrupts 


0038 (03E7) RST 7 INTERRUPT ENTRY CONT'D 
003B EXT INTERRUPT 


0040 * Ato UD to here, copied into the RAM 
0040 L ROM disable 
OOS TERE SEAR eee EERE Restore high kernel jmps 


0044 Copy 
0047 003F 
0048 to 

0049 0000 
004A into RAM 
004C RST 0 to 
004E 0030 
0051 Jump 


148 


First Publishing Anatomy of the CPC's 


eT 


0054 Block 
0057 Copy 


Reset kernal, cancel event queues and certain other operations 


005D (Curr. ROM configuration) 
0060 (Entry current ROM) 

0064 Clear 

0066 firmware 

0069 RAM 

006B up 

006C B8&CD 

0071 Was a ROM on? 

0072 Yes jump 

007C if hl=0 

007D load default 

0080 (Curr. exp. ROM) 

0083 (Curr. ROM configuration) 
0086 (Entry curr. ROM) 

0089 Load param's 

OO8C for RST 3 

0095 FAR CALL 

0096 dw B8D7 


How much time has elapsed? 


009A (Timer high) 
OO9E (Timer low) 


Set time to pre-determined value. 

00A4 Load accumulator with 0 and reset flag 
OOA5 (Timer flag) 

OOA8 (Timer high) 

OOAC (Timer low) 


OOB1 age 2 oe 2k 2 2c 2 2 2 3k 26 2 2 2k 2 2 oo OK Scan events 
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0OB1 Timer low 

00B4 Update 

OOBS Timer 

OOBA Port B 

OOBC VSYNC? 

OOBD No jump 

OOBF (Start frame fly chain) 

00C2 High byte to accumulator 
00C3 Is accumulator 0? 

00C4 Accumulator not 0, jump to kick event 
00C7 (Start fast ticker chain) 

OOCA High byte to accumulator 
OOCB Is accumulator 0? 

OOCC Accumulator not 0, jump to kick event 
OOCF Scan sound queues 

00D2 Count for ticker 

OOD9 Update key state map 

OODC (Start ticker chain) 

OODF High byte to accumulator 
OOEO Is accumulator 0? 

OOE1 Accumulator 0, jump 

OOE2 Different flags for int. routine 
OOES Ticker chain is still 

QOE7 to be processed 

OOF2 (Start int. pending queue) 
OOF8 Different flags for int. routine 
010A (sp save) 

0O10E Timer low 

0114 Different flags for int. routine 
011D (Start int. pending queue) 
0120 High byte to accumulator 
0121 Is accumulator 0? 

0122 Accumulator 0, jump 

0127 (Start int. pending queue) 
0132 Different flags for int. routine 
0135 Ticker queue pending? 

0137 No, jump 

013D Process ticker chain 

0142 Different flags for int. routine 
0145 High byte to accumulator 
0146 Anything else to be processed? 
0147 Yes, jump 
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0149 Reset flags 
014E Reload sp 


0153 2 2k 2k 2k 2k 2k 2 2h ke 2g 2k 2 2g 2 2 2 2 Kick event 


0158 KL EVENT 

015D KL EVENT 

0161 Kick event 

Set up and add event block 
0166 KL INIT EVENT 
Add event block. 


016A Start Frame Fly Chain 
016D Add Event 


Delete event block. 


0170 Start frame fly chain 
0173 Delete event 


°1999999292922222292 


0179 KL INIT EVENT 
Add event block (see KL DEL FRAME FLY). 


017D Start fast ticker chain 
0180 Add event 
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Delete event block (see KL DEL FRAME FLY). 


0183 Start fast ticker chain 
0186 Delete event 


O189 * RRR RR KICK! Process ticker chain 
0189 (Start ticker chain) 

018C High byte to accumulator 

018D Is accumulator 0? 

018E Accumulator 0, jump 

01A4 KL EVENT 

Add ticker block. 


O1BF Start ticker chain 
01C2 Add event 


Delete ticker block. 


01CS5 Start ticker chain 
01C8 Delete event 


Set up event block 

"Kick" event block 

O1E7 Event Cnt >127/<0 
O1EB Event Cnt >0&<127 
O1F1 Add sync event 


Execute event routine 
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eS 


021F (0467) KL FAR INCALL CONT'D 
0227 sHebdcocicdckcckee KT SYNC RESET 


Delete Sync Pending Queue 


022E 2k kk kk ak kk ake ak ok ok ok 2 a KK A dd sync event 


022F Priority to b 

0230 Command for execution 
0236 Get address 

0237 of next event block 
0238 to de 

0240 Current priority > found 
0241 Priority? 

0242 No, jump 


Next please 

0256 (Start sync pending queue) 
0259 High byte to accumulator 
025A Is accumulator 0? 

025B Accumulator 0, jump 
0263 (Priority curr. event) 
026B (Priority curr. event) 
026E (Start sync pending queue) 


Event routine finished 


0276 (Priority curr. event) 
027E Add sync event 


0284 *#t¥e ede eRe REE KT DEL SYNCHRONOUS 
Delete a given block from the Pending Queue 


0284 KL DISARM EVENT 
0287 Start sync pending queue 
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028A Delete event 
Lock event block (counter negative) 


Disabling normal simultaneous events. Express simultaneous events are not 
disabled. 


0294 Priority curr. event 

Enable normal simultaneous events. 

029A Priority curr. event 

Add resident expansions 

Search for command in all storage areas added. 

02B1 Command for execution 

02B7 (0553) KL ROM OFF & CONFIGURATION SAVE 
02DA (0524) KL PROBE ROM CONT'D 

02E4 MC START PROGRAM 

02FC (051F) KL ROM SELECT CONT'D 

0307 Command for execution 

0323 (052D) KL ROM DESELECT CONT'D 

Finds and initialises ROM expansions so that these ROM's are available. 


0328 KL INIT BACK 
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Add ROM expansions 


0330 Curr. ROM configuration 

0339 (051F) KL ROM SELECT CONT'D 
0351 (Curr. exp. ROM) 

0360 KL LOG EXT 

0366 (052D) KL ROM DESELECT CONT'D 


0379 AR aR RR RR RK AR KAKA dd event 


0388 AR aR RR RR RR RK RRR Delete event 


0397 eR KT SET RAM CONFIGURATION 


Here, there is a switch-over between the different RAM configurations of 
the CPC 6128. 


0398 Rescue register 

0399 Curr. RAM configuration 

039E Processing for gate array 

03A0 RAM configuration switch-over 
03A3 Restore old register status 


03A6 (0505) KL U ROM ENABLE CONT'D 
03A9 (OSO0C) KL U ROM DISABLE CONT'D 
03AC (04F7) KL L ROM ENABLE CONT'D 
03AF (04FE) KL L ROM DISABLE CONT'D 
03B2 (0516) KL ROM RESTORE CONT'D 
03B5 (051F) KL ROM SELECT CONT'D 
03B8 (0543) KL CURR SELECTION CONT'D 
03BB (0524) KL PROBE ROM CONT'D 
O3BE (052D) KL ROM DESELECT CONT'D 
03C1 (0547) KL LDIR CONT'D 

03C4 (054D) KL LDDR CONT'D 


0307 RRR RRR EEE KT | POLL SYNCHRONOUS 
Is there an event with a higher priority than that of the current event? 


03D6 (Start sync pending queue) 
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03E0O (Priority curr. event) 

O3E7 RK RRR RST 7 INTERRUPT ENTRY CONT'D 
Compare with RST 7 INTERRUPT ENTRY 

03E9 KL EXT INTERRUPT ENTRY 

03F4 L ROM enable 

03F6 Scan events 

O3FE (Different flags for int. routine) 

0418 Set old configuration 

O41 E * eR RA RRA KT EXT INTERRUPT ENTRY 


0423 L ROM disable 


Jump to lower ROM or RAM 

Compare with RST 1 LOW JUMP. 

043C Rotate accumulator four times to the left 

0445 (0456) Prepare configuration and execute jump 
0456 Place branch address on stack 

0458 Set ROM configuration 

O45E Execute prepared jump 


0467 Ab Robe KT PAR ICALL CONT'D 


O046D **eHRRR RRR RKEREEE RST 3 LOW FAR CALL CONT'D 
Compare with RST 3 LOW FAR CALL 

047C ROM# > 252? 

047E Yes, jump 


0480 Expansion ROM 
0482 Enable 
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0484 Curr. expansion ROM 

04A2 LROM disable 

04A4 U ROM enable 

04A6 (0456) Prepare configuration and execute jump 
O4AF Restore 

04B0 old expansion 

04B1 ROM 

04B3 configuration 

04B5 (Curr. expansion ROM) 


043 Rak KA] RST 2 LOW SIDE CALL CONT'D 
Compare with RST 2 LOW SIDE CALL 

04D5 (Curr. ROM configuration) 

O4DB rH aka RST S FIRM JUMP CONT'D 
Compare with RST 5 FIRM JUMP 

04E3 L ROM enable 

04ES5 Load jump address 

04EB and execute jump 

04FO L ROM disable 

O4F7 RRR RRR RRR EERE EEE KT TL ROM ENABLE CONT'D 
Enable lower ROM 


04FA L ROM enable 
O4FC Jump to execution 


O4 FE AHA ck KT TL ROM DISABLE CONT'D 
Disable lower ROM 


0501 L ROM disable 
0503 Jump to execution 


QSOS *R RRR RRR KKK EREEEE KT U ROM ENABLE CONT'D 
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Enable upper ROM 


0508 U ROM enable 
OSOA Jump to execution 


OSOC *# RRR RK EEK EEAEE KT UL ROM DISABLE CONT'D 
Disable upper ROM 


OS5OF U ROM disable 
0511 Execution 


0516 AHH KT) ROM RESTORE CONT'D 
Restore old ROM configuration 

0517 acontains 

0518 the old 

0519 configuration 

051D Jump to execution 

Select a given upper ROM 

051F (0505) KL U ROM ENABLE CONT'D 

Probe ROM 

0524 (051F) KL ROM SELECT CONT'D 

052D ee eek KT ROM DESELECT CONT'D 
Restore old upper ROM configuration 

052F (0516) KL ROM RESTORE CONT'D 

0535 Expansion ROM (# in c) 


0537 Enable 
0539 Curr. expansion ROM 


158 


First Publishing Anatomy of the CPC's 





0543 HR kA etck RK KT CURR SELECTION CONT'D 
Which upper ROM is "on"? 

0543 Curr. expansion ROM 

0547 fe 2h 26 2k 2k is 3k 2 246 2c 2c 2 2c 2 2k 2 26 2 2k 2k KL LDIR CONT'D 
LDIR with blocked ROM's 

0547 (0553) KL ROM OFF & CONFIG. SAVE 
LDDR with blocked ROM's 

054D (0553) KL ROM OFF & CONFIG. SAVE 
0553 * RRR RRR RAK EKER KT ROM OFF & CONFIG. SAVE 
0555 Manipulate RET address 

0556 Save old configuration onto stack 

0557 ROM's 

0559 Disable 

OSSD Call (hl) 

0561 Restore 

0562 old 

0563 configuration 

0568 Manipulate RET address 

Compare RST 4 RAM LAM 

OS6F ROM's 

0571 Disable 

0576 Get byte 

0578 Set old configuration 


Corresponds to ld a,(ix) 
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0S7F ROM's 
0581 Disable 
0583 Get byte 
0586 Set old configuration 
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2.5.2 Machine Pack (MC) 


Here, we come to the machine-related part of the operating system. This is 
where the different interfaces and peripherals such as PIO and PSG are 
controlled. The advantage of this is that only the MACHINE PACK will need 
to be adapted if any changes are made to the hardware, in the same way as for 
the BIOS in CP/M. 


0591 2K RRR Racet Cont'd 


0592 Control 

0597 PortA 

059C Port C 

O5A1 Centronics 

OSA6 Port B 

OSAA Isolate LK4 

OSAC End of 60Hz table 
OSAF 50Hz? Jump if not 
05B1 End of 50Hz table 
05B7 Load video register address 
OS5BC Load video register 


05C5 fee kk 2 2k ke 2k fs 2 2k fe 2k 2 24 2k 2c 2k 2c 2 2 2 60Hz table 


3F 28 2E 8E 26 00 19 1E 
00 07 00 00 30 00 00 00 


3F 28 EE 8E 1F 06 19 1B 
00 07 00 00 30 00 00 00 


OSES Cold start 
O5E8 In continuation 
052B Address 


Resets the operating system and hands over control to a routine in (hl). 


05F1 SOUND RESET 
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OSF5 Reset 

OSF8 peripherals 

OSFA KL CHOKE OFF 

0601 KM RESET 

0604 TXT RESET 

0607 SCR RESET 

060A KL U ROM ENABLE CONT'D 
060E jp (hl) 

0613 MC START PROGRAM 

0617 Load error 


Completely initialise system and call program whose start address _ is 
contained in hl. 


061C After 066F, reaches RET 

0620 Set interrupt mode 1 

0622 Rescue register contents 

0623 Palette pointer reset 

0628 Possibly connected 

062B Peripheral reset 

062D Reset RAM 

0630 configuration 

0632 Floppy disk drive motor on/off flip/flop 
0636 Turn off floppy disk drive motor 
0638 Copy &7F9 bytes from 

063B start address &B100 

063E to destination address &B101 
0641 Load &B100 with contents of accumulator 
0642 Carry out copy process 

0644 U ROM off & LROM on 

0647 Screen mode 1 

0649 Restore old register contents 
0652 Restore high kernel jumps 

0655 JUMP RESTORE 

0658 KM INITIALISE 

065B SOUND RESET 

065E SCR INITIALISE 

0661 TXT INITIALISE 

0664 GRA INITIALISE 

0667 CAS INITIALISE 

066A MC RESET PRINTER 
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066F jp (hl) 
0674 Initialise U ROM 


0677 A GR RRR REE Cold start 


067A TXT SET CURSOR 
067D Output firm names 
0680 Output messages 
0683 Power-up message 
0686 Output messages 


0688 2 fe 2 fe 2k 2 2g 2 2 2c 2 2 2 2 2 2 2 2 oe Power-up display 


0689 128K 

068E Microcomputer 
069D (v3) 

064A Copyright 
06B0 c1985 

06B6 Amstrad 

O6BE Consumer 
06C7 Electronics 
06D3 plc 

06D9 and 

06DD Locomotive 
O06E8 Software 

O6F1 Ltd 

O6F9 Load error message 


06FC 2 fe 2 9 2g 2k kc 2 oe 2c 2 2 2 a 2s ke 2 2 ok ok OK Output message 


0700 TXT OUTPUT 
0703 Output message 


0705 HebbedoeKbcKeRE T oad error message 
0705 *** 

0709 PROGRAM 

0711 LOAD 


0716 FAILED 
O71E *** 


0725 Port B 
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0728 Isolate LK1...3 
072A /2 
072B Firm names 


0738 23h 2h fe 3s 2s 3s 2 fe fe fe 2c 2c 24 2c 2k 2 2k 2 2 2k ok Firm names 


0738 Arnold 
073F Amstrad 
0747 Orion 
074D Schneider 
0757 Awa 
075B Solavox 
0763 Saisho 
076A Triumph 
0772 Isp 


Set monitor mode 

0776 Mode >2? 

0778 If so, return 

077B Reset 

077D mode bits 

0780 Set new 

0781 mode 

Set screen edge and all inks to one colour 
0786 Place contents of hl on stack 

0787 then load hl with &0000 

078A Six bytes further on 

Output colours of all inks and screen edge 
078C Place contents of hl on stack 

078D then load hl with &0001 


0793 Border colour 
0796 Output colour 
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079A Address ink 0 
079C Output colour 
07A4 Load all colour memories 


O7AA ate fe 2 2k ie 2k 2 2 2k 2 2c 2 2 2 2k Output colour 


O7AA Palette pointer 

O7AD Reset bits 5, 6 and 7 of accumulator 
O7AF then set bit 6 

07B1 colour 


Wait for flyback 


07B6 Port B 
O7BA VSYNC? 
O7BB If not, wait 


Set screen offset 


07C3 Reset all bits except 4 and 5 
07C6 Reset all bits except 0 and 1 
07CE Video contr register 12 
07D1 Screen start Hi 

07DS5 Register 13 

07DC Screen start low 


Reset indirect branch point for printer 


0O7EO Start address 

07E3 Destination address 

07E6 21 bytes 

07E9 Copy 

O7EE Move (hl+3) to ((hl+1)),cnt = (hl) 
O7F1 db 03 3 bytes 

07F2 dw BDF! destination address 
07F4 MC WAIT PRINTER 
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O7F7 ke he 2h 2c 2 24 2k 2k 2k 2 2 2h 2k 2 2 OK oe Convert umlauts 


The following table was copied to the RAM by MC RESET PRINTER 
(destination address &B804). The first byte in the table indicates the length 
of the table in bytes. Then come a number of byte pairs, the first of which 
indicates the corresponding internal keyboard code and the second the 
characters allocated as standard. If this table is altered in the RAM, it is 
possible to manipulate the characters allocated to the keyboard code and thus, 
for example, generate an American keyboard. 


07F7 db OA number of bytes 


O7F8 db AO internal keyboard code 
0O7F9 db 5E allocated character “ 


O7FA db Al internal keyboard code 
O7FB db SC allocated character \ 


O7FC db A2 internal keyboard code 
O7FD db 7B allocated character { 


O7FE db A3 internal keyboard code 
O7FF db 23 allocated character # 


0800 db A6 internal keyboard code 
0801 db 40 allocated character @ 


0802 db AB internal keyboard code 
0803 db7C allocated character | 


0804 db AC internal keyboard code 
0805 db 7D allocated character } 


0806 db AD internal keyboard code 
0807 db 7E allocated character ~ 


0808 db AE internal keyboard code 
0809 db 5D allocated character ] 


080A db AF internal keyboard code 
080B db 5B allocated character [ 


O80C REA MIC CHARACTER ASSIGNMENT 
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Here is the umlaut conversion operation 

O80C hi: start address of new character table (RAM) 
0812 Convert umlauts (RAM) 

0817 KL LDIR CONT'D 

081B 24 3 fs 2 2c 2k 2c 2c 2k: kc 2 2 24 2k kc 2c 2c 2k 2k MC PRINT CHAR 


Outputs the character in a to the Centronics port. After the return from this 
routine, the carry flag is set if the character has been successfully set. 


0826 Umlaut? 
0828 Jump if not 
082F MC WAIT PRINTER 


Send a character to the printer; if the printer is not ready, wait for a given 
time. 


0838 MC BUSY PRINTER 
083B MC SEND PRINTER 


Sends a character to the printer, which must not be busy. 
0847 Byte without strobe 

0849 to printer 

084E Strobe on 

0853 Strobe off 


Check to see if printer is busy 
085A Port B 

O85E Printer busy 

O85F to carry 
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Supply sound controller with data. MC SOUND REGISTER is of interest to 
music lovers. You do not have to bother with the rather complicated business 
of data transmission to the PSG; all you have to do is transmit the desired 
register number in the accumulator and the data byte in c. 


0864 Port A 
0866 Sound register # 
0868 Port C 
086A Sound chip 
086C To input 
O86E & strobe on 
0872 Strobe off 
0874 Port A 
0876 Sound data 
0878 Port C 
087D Latch 
O87F data 


0883 3K fe 2c 246 fe 246 2 2 24s 2 kc 2c 2k 2k 2 2k ok 2k ok Scan keyboard 


0883 Port A 

0886 Sound register 14 (keyboard X input) 
0888 Port C 

0891 Strobe on 

0893 Strobe off 

0896 Port A&B = input 

0898 Control 

089D Port C 

O89F Keyboard Y output and X input 
O8A1 Port A 

08A3 Data (keyboard X input) to accumulator 
O8AC Keyboard Y + 1 

O8BO All Y lines processed? 

08B2 No, then next line 

O8B5 Port A output 

08B7 Control 

O8BA Port C 
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2.5.3 Jump Restore (JRE) 


The sole purpose of this pack is to restore the MAIN JUMP addresses to their 
default values. The FIRM JUMPS are prefixed by an RST 1, and the 
ARITHMETIC JUMPS by an RST 5. 


If, after a bout of strenuous programming, you feel that you have changed 
far too many vectors, simply pull on the “emergency brake", by initiating 
this JUMP RESTORE. This is always advisable if you exit from a program 
in which you have replaced a large number of operating system routines by 
your own. 


O8BD Main jump address 

O8CO Pointer to vector range in RAM 
08C3 b: number of vectors c: code RST 1 
08C6 Copy vector table 

08C9 b: number of vectors c: code RST 5 
O8CD Store code RST 

O8CE Pointer + | (RAM) 

O8CF One byte from ROM to RAM 
O8D1 be at value for LDI 

08D2 Complement accumulator 

08D3 Shift bit 5 to 

08D4 bit 7 and 

O8DS isolate 

O8D7 Get bits 0-6 from address high byte 
O8D8 Store high byte 

O8D9 Pointer + 1 (RAM) 

O8DA Pointer + 1 (ROM) 

O8DB Continue as long as necessary 
O8DD Return from subroutine 


O8DE 2g eof ke 2 2k fe 2 fe 2 fe 2 2 2 2k oe 2 oe ok ko ok ok ak kK V9 17 Jump Address 


O8DE dw 1B5C KM INITIALISE 
O8E0 dw 1B98 KM RESET 

08E2 dw IBBF KM WAIT CHAR 
O8E4 dw 1BC5 KM READ CHAR 
O8E6 dw 1BFA KM CHAR RETURN 
O8E8 dw 1C46 KM SET EXPAND 
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O8EA dw 1CB3 KM SET EXPAND 
O8EC dw 1C04 KM EXPAND BUFFER 
O8EE dw 1CDB KM WAIT KEY 

08FO dw 1CE1 KM READ KEY 

O8F2 dw 1E45 KM TEST KEY 

08F4 dw 1D38 KM GET STATE 

08F6 dw 1DE5 KM GET JOYSTICK 
O8F8 dw IED8 KM SET TRANSLATE 
O8FA dw 1EC4 KM GET TRANSLATE 
O8FC dw 1EDD KM SET SHIFT 

O8FE dw 1EC9 KM GET SHIFT 

0900 dw 1EE2 KM SET CONTROL 
0902 dw IECE KM GET CONTROL 
0904 dw 1E34 KM SET REPEAT 

0906 dw 1E2F KM GET REPEAT 
0908 dw 1DF6 KM SET DELAY 

090A dw 1DF2 KM GET DELAY 
090C dw IDFA KM ARM BREAK 
090E dw 1EOB KM DISARM BREAK 
0910 dw 1E19 KM BREAK EVENT 


0912 dw 1074 TXT INITIALISE 

0914 dw 1984 TXT RESET 

0916 dw 1459 TXT VDU ENABLE 
0918 dw 1452 TXT VDU DISABLE 
091A dw 13FE TXT OUTPUT 

091C dw 1335 TXT WR CHAR 

O91E dw 13AC TXT RD CHAR 

0920 dw 13A8 TXT SET GRAPHIC 
0922 dw 1208 TXT WIN ENABLE 
0924 dw 1252 TXT GET WINDOW 
0926 dw 154F TXT CLEAR WINDOW 
0928 dw 115A TXT SET COLUMN 
092A dw 1165 TXT SET ROW 

092C dw 1170 TXT SET CURSOR 
092E dw 117C TXT GET CURSOR 
0930 dw 1286 TXT CUR ENABLE 
0932 dw 1297 TXT CUR DISABLE 
0934 dw 1276 TXT CUR ON 

0936 dw 127E TXT CUR OFF 

0938 dw 11CA TXT VALIDATE 
093A dw 1265 TXT PLACE/REMOVE CURSOR 
093C dw 1265 TXT PLACE/REMOVE CURSOR 
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093E dw 12A6 TXT SET PEN 

0940 dw 12BA TXT GET PEN 

0942 dw 12AB TXT SET PAPER 
0944 dw 12CO TXT GET PAPER 
0946 dw 12C6 TXT INVERSE 

0948 dw 137B TXT SET BACK 

094A dw 1388 TXT GET BACK 
094C dw 12D4 TXT GET MATRIX 
094E dw 12F2 TXT SET MATRIX 
0950 dw 12FE TXT SET M TABLE 
0952 dw 132B TXT GET M TABLE 
0954 dw 14D4 TXT GET CONTROLS 
0956 dw 10E4 TXT STR SELECT 
0958 dw 1103 TXT SWAP STREAMS 


095A dw 15A8 GRA INITIALISE 
095C. dw 15D7 GRA RESET 

O9SE dw 1SFE GRA MOVE ABSOLUTE 
0960 dw 15SFB GRA MOVE RELATIVE 
0962 dw 1606 GRA ASK CURSOR 

0964 dw 160E GRA SET ORIGIN 

0966 dw 161C GRA GET ORIGIN 

0968 dw 16A5 GRA WIN WIDTH 

096A dw 16EA GRA WIN HEIGHT 
096C dw 1717 GRA GET W WIDTH 
096E dw 172D GRA GET W HEIGHT 
0970 dw 1736 GRA CLEAR WINDOW 
0972 dw 1767 GRA SET PEN 

0974 dw 1775 GRA GET PEN 

0976 dw 176E GRA SET PAPER 

0978 dw 177A GRA GET PAPER 

097A dw 1783 GRA PLOT ABSOLUTE 
097C dw 1780 GRA PLOT RELATIVE 
097E dw 1797 GRA TEST ABSOLUTE 
0980 dw 1794 GRA TEST RELATIVE 
0982 dw 17A9 GRA LINE ABSOLUTE 
0984 dw 17A6 GRA LINE RELATIVE 
0986 dw 1940 GRA WR CHAR 


0988 dw OABF SCR INITIALISE 
098A dw OADO SCR RESET 
098C dw 0B37 SCR SET OFFSET 
O98E dw OB3C SCR SET BASE 
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0990 dw 0B56 SCR GET LOCATION 
0992 dw OAE9 SCR SET MODE 
0994 dw OBOC SCR GET MODE 
0996 dw 0B17 SCR MODE CLEAR 
0998 dw OBS5D SCR CHAR LIMITS 
099A dw OB6A SCR CHAR POSITION 
099C dw OBAF SCR DOT POSITION 
099E dw 0C05 SCR NEXT BYTE 
09A0 dw 0C11 SCR PREV BYTE 
09A2 dw OC1F SCR NEXT LINE 
09A4 dw 0C39 SCR PREV LINE 
09A6 dw OC8E SCR INK ENCODE 
09A8 dw OCA7 SCR INK DECODE 
O9AA dw OCF2 SCR SET INK 

O9AC dw ODIA SCR GET INK 

O9AE dw OCF7 SCR SET BORDER 
09B0 dw 0D1F SCR GET BORDER 
09B2 dw OCEA SCR SET FLASHING 
09B4 dw OCEE SCR GET FLASHING 
09B6 dw ODB9 SCR FILL BOX 

09B8 dw ODBD SCR FLOOD BOX 
O9BA dw ODES SCR CHAR INVERT 
O9BC dw 0E00 SCR HW ROLL 

O9BE dw 0E44 SCR SW ROLL 

09CO dw OEF9 SCR UNPACK 

09C2 dw OF2A SCR REPACK 

09C4 dw 0C55 SCR ACCESS 

09C6 dw 0C74 SCR PIXELS 

09C8 dw 0F93 SCR HORIZONTAL 
09CA dw OF9B SCR VERTICAL 


O9CC dw 24BC CAS INITIALISE 
O9CE dw 24CE CAS SET SPEED 
09DO dw 24E1 CAS NOISY 

09D2 dw 2BBB CAS START MOTOR 
09D4 dw 2BBF CAS STOP MOTOR 
09D6 dw 2BC1 CAS RESTORE MOTOR 
09D8 dw 24E5 CAS IN OPEN 

O9DA dw 2550 CAS IN CLOSE 

O9DC dw 2557 CAS IN ABANDON 
O9DE dw 25A0 CAS IN CHAR 

O9EO dw 2618 CAS IN DIRECT 

O9E2 dw 2607 CAS RETURN 
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09E4 dw 2603 CAS TEST EOF 

09E6 dw 24FE CAS OUT OPEN 
O9E8 dw 257F CAS OUT CLOSE 
O9EA dw 2599 CAS OUT ABANDON 
O9EC dw 25C6 CAS OUT CHAR 
O9EE dw 2653 CAS OUT DIRECT 
09FO dw 2692 CAS CATALOG 

O9F2 dw 29AF CAS WRITE 

09F4 dw 29A6 CAS READ 

O9F6 dw 29C1 CAS CHECK 


09F8 dw 1FE9 SOUND RESET 

O9FA dw 2114 SOUND QUEUE 

O9FC dw 21CE SOUND CHECK 

O9FE dw 21EB SOUND ARM EVENT 
0A00 dw 21AC SOUND RELEASE 

0A02 dw 2050 SOUND HOLD 

0A04 dw 206B SOUND CONTINUE 

0A06 dw 2495 SOUND AMPL ENVELOPE 
0A08 dw 249A SOUND TONE ENVELOPE 
OAOA dw 24A6 SOUND A ADDRESS 
OAOC dw 24AB SOUND T ADDRESS 


OAOE dw 005C KL CHOKE OFF 

0A10 dw 0326 KL ROM WALK 

0A12 dw 0330 KL INIT BACK 

0A14 dw 02A0 KL LOG EXT 

0A16 dw 02B1 KL FIND COMMAND 
0A18 dw 0163 KL NEW FRAME FLY 
OA1A dw 016A KL ADD FRAME FLY 
OA1C dw 0170 KL DEL FRAME FLY 
OA1E dw 0176 KL NEW FAST TICKER 
0A20 dw 017D KL ADD FAST TICKER 
0A22 dw 0183 KL DEL FAST TICKER 
0A24 dw 01B3 KL ADD TICKER 

0A26 dw 01C5 KL DEL TICKER 

0A28 dw 01D2 KL INIT EVENT 

0A2A dw 01E2 KL EVENT 

OA2C dw 0227 KL SYNC RESET 

OA2E dw 0284 KL DELETE SYNCHRONOUS 
0A30 dw 0255 KL NEXT SYNC 

0A32 dw 0219 KL DO SYNC 

0A34 dw 0276 KL DONE SYNC 
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0A36 dw 0294 KL EVENT DISABLE 
0A38 dw 029A KL EVENT ENABLE 
0A3A dw 028D KL DISARM EVENT 
O0A3C dw 0099 KL TIME PLEASE 
0A3E dw 00A3 KL TIME SET 


0A40 dw 0OSED MC BOOT PROGRAM 
0A42 dw 061C MC START PROGRAM 
0A44 dw 07B4 MC WAIT FLYBACK 
0A46 dw 0776 MC SET MODE 

0A48 dw 07CO MC SCREEN OFFSET 
OA4A dw 0786 MC CLEAR INKS 
OA4C dw 078C MC SET INKS 

OA4E dw 07E0 MC RESET PRINTER 
0AS0 dw 081B MC PRINT CHAR 
0AS2 dw 0858 MC BUSY PRINTER 
0A54 dw 0844 MC SEND PRINTER 
0A56 dw 0863 MC SOUND REGISTER 


0A58 dw 08BD JUMP RESTORE 


OASA dw 1D3C KM SET STATE 

OASC dw IBFE KM PUFFER ENTLEEREN 
OASE dw 1460 TXT LFD.CURSOR FLAG 

0A60 dw 1SEC GRA NN 

0A62 dw 19DS GRA PARM SAVE 

0A64 dw 17B0 GRA MASK PARM SAVE 

0A66 dw 17AC GRA MASK PARM SAVE 

0A68 dw 1624 GRA COORDINATE CONVERSION 
OA6A dw 19D9 GRA FILL 

OA6C dw 0B45 SCR CHANGE SCREEN START 
OA6E dw 080C MC PLOTTING 

0A70 dw 0397 KL RAM-SET CONFIGURATION 


0,072, eebbbecneiiciniciiiiciciicicc®B A SIC Jump Adr. 
0A72 dw 2C02 EDIT 


0A74 dw 2F91 FLO COPY VARIABLE FROM (DE) TO (HL) 
0A76 dw 2F97 FLO INTEGER TO FLOATING POINT 

0A78 dw 2FC8 FLO 4-BYTE VALUE TO FLOATING POINT 
OA7A dw 2FD9 FLO FLOATING POINT TO INTEGER 
OA7C dw 3001 FLO FLOATING POINT TO INTEGER 
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OA7E dw 3014 FLO FIX 

0A80 dw 3055 FLO INT 

0A82 dw 305F FLO 

0A84 dw 30C6 FLO NUMBER WITH POWER OF 10 MULTIPLIER 
0A86 dw 34A2 FLO ADDITION 

0A88 dw 3159 FLO RND 

OA8A dw 349E FLO SUBTRACTION 

OA8C dw 3577 FLO MULTIPLICATION 

OA8E dw 3604 FLO DIVISION 

0A90 dw 3188 FLO FETCH LAST RND-VALUE 
0A92 dw 36DF FLO COMPARE 

0A94 dw 3731 FLO SHOW CHANGE 

0A96 dw 3727 FLO SGN 

0A98 dw 3345 FLO DEG/RAD 

OA9A dw 2F73 FLO PI 

OA9C dw 32AC FLO SQR 

OA9E dw 32AF FLO EXPONENTIATION 
OAAO dw 31B6 FLO LOG 

OAA2 dw 31B1 FLO LOGIO 

OAA4 dw 322F FLO EXP 

OAA6 dw 3353 FLO SIN 

OAA8 dw 3349 FLO COS 

OAAA dw 33C8 FLO TAN 

OAAC dw 33D8 FLO ATN 

OAAE dw 2FD1 FLO 4-BYTE-VALUE TO FLOATING POINT 
OABO dw 3136 FLO RND INIT 

OAB2 dw 3143 FLO SET RND SEED 


DAB HA Hbb Ei nnineKeedee Move (h1+3) to ((hl+1)),cnt=(hl) 
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2.5.4 Screen Pack (SCR) 


The SCREEN PACK is slaved to the TEXT and GRAPHICS PACKS. It 
practically serves as their executive and is thus responsible for direct control 
of the screen. 


Complete initialisation of the Screen Pack. 


OABF Default Colour 

OAC2 MC CLEAR INKS 
OAC7 (High Byte Screen Start) 
OACA SCR RESET 


Screen pack reset. 


OAD1 SCR ACCESS 

OAD4 Restore SCR Indirections 

OAD7 Move (hl+3) to ((hl+1)),cnt=(hl) 
OADA Reset Colour 

OADD db 09 9 Bytes 

OADE dw BDES Destination Address 
OAEO SCR READ 

OAE3 SCR WRITE 

OAE6 SCR CLEAR 


OAE9 24 ee 2 2 ee 2 2k 2k oe 2k 2k foe 2 2 he oe oe 2 2k fe ok ok ok ok i ok ak ok ok ak ak ok aK SCR SET MODE 
Set screen to anew mode. 


OAFF SCR CLEAR 


Get current screen mode 


OBOC (curr. Screen Mode) 


OB17 2k 2k He 2k eo eof ek oe fe oe oe 2k 2k fe 2k oe eo 2 oko 2 ko ok 2 a 2 2k 2k 2k ok 2 KG CR CLEAR 


Clear screen 
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0B1D SCR SET OFFSET 
0B25 hl=Base Address 
0B26 de=Base Address+1 
0B28 16K 

0B2C CLEAR SCREEN 


0B31 (curr. Screen Mode) 
0B34 MC SET MODE 


Set start address of first character relative to the base address of the video 
RAM. 


0B37 (High Byte Screen Start) 
Base address of video RAM 


OB3C (Position within each Line) 
0B42 MC SCREEN OFFSET 


0B47 (High Byte Screen Start) 
0B51 (Position within each Line) 


Current screen start? (Base + offset) 


0OBS56 (Position within each Line) 
0B59 (High Byte Screen Start) 


Get maximum number of screen lines and columns (mode-dependent). 
OB5D SCR GET MODE 
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Transfer physical coordinates to a screen position 


OB6B SCR GET MODE 
0B93 (High Byte Screen Start) 
OBA6 SCR CHAR POSITION 


OBAF 24 2 fe 2 2k fe 2 2h fe 2 2k he 2 2k he 2 ke 2 2 2 ok kk 2 A SCR DOT POSITION 
Determine screen position for a pixel 

OBED (High Byte Screen Start) 

OBF6 SCR GET MODE 

0COS5 2 eee 2 2B ee 2 2 ee 2 2 he ee 2 ee KK AS COR NEXT BYTE 


Supplies hl with the screen address of the next byte position if you have 
provided hl with the old address before the jump. This may seem 
superfluous, but it is very useful. It is not simple, in fact, to determine the 
byte position on the basis of the graphics-orientated organisation of the 
screen. Furthermore, distance is mode-dependent. 


It is important to know that, if the next position is no longer located on the 
screen, the address supplied will be meaningless. It will then be in the area of 
the last bytes (not used for display purposes) of the video RAM. 


OC11 FA IC IC I ik A tok ack kG CK SCR PREV 


BYTE 


Supplies hl with the screen address of the previous byte position if you have 
provided hl with the old address before the jump. Compare with the SCR 
NEXT BYTE. 


OC1F A Re a tok ack ic i cic ak i kk kk kk AR KG CR NEXT 


LINE 


Operates in a similar way to SCR NEXT BYTE, except that the screen 
address is moved on one full line. Here too, the address is invalid outside the 
displayable area. 


0C39 FEC Cc GC GG AR IIR SCR PREV 


LINE 
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Operates in a similar way to SCR PREV BYTE, except that the screen 
address is moved back one full line. Compare with SCR NEXT LINE and 
SCR PREV LINE. 


0C55 2fe 2 2 fe 2k 2 2 ke 2k fe kee fe ke ke 2 ke 2k 2 ee oe eke ke 2 eke ke 2k oe ke 2k kk kek kk dS CR 


ACCESS 

Set control characters visible/invisible. 
0C57 SCR PIXELS (FORCE MODE) 
OCSE Low Byte XOR Mode 

0C62 Low Byte AND Mode 

0C66 Low Byte OR Mode 


0C68 jp 
OC6A (Write Indirection) 


0C71 2Fe 22 ee ke 2k 2k 2 ee ke ke 2 2k ee he 2k 2k ee fe ke 2k 2k 2 2 ee ke ke he 2 2 ee ke ie ke 2k 2 kk EK SCR 


WRITE 
0C71 Write Indirection 


0C74 2g 2k 2 fe fe 2 ee fe 2k 2 9 2 2 ee 2 2 kk 2k 2 kk 2k kk kek 2k kk SCR PIXELS (FORCE 
Mode) 


Set dot on screen 


OC7TA 2g eof fe 2 fee 2k fee 2 2 fe 2 2k kee 2 2 2 2k 2 2 2k 2 oe 2k ie 2 2k ie 2 2k 2 2 2 ke 2k 2 A AY C)R- Mode 
OC7F 2fe fe fe 2 fe 2 eke 2 fe 2k 2 fe 2k 2k ef 2k fe 2 2k 2k he 2 2 ee 2 ee 2k 2 he 2 2 ee 2 2 2k 2K HA AD) Mode 
0C85 2Fe fe fee 2k 2 fe 2k 2k fe 2 fe 2 fe 2 fe 2 2k 2 2k 2 2k 2 2k 2 ke 2 ke 2k ke 2k 2k 2 2k kk 42k KO) Mode 


OC8A 2¥e ee 2 fe ee 2 2k ie 2 2 2k ee 2 2k ee 2 2k ee 2k ie he 2 2h hee 2 ee 2 2 2 2k a Kk KK SCR 


READ 
OC8E AEC CC OI RR kk kk kk SCR INK ENCODE 
Encoding an ink so that all picture dots are set to this ink. 


Decoding an ink 


179 


First Publishing Anatomy of the CPC's 


0CC9 SCR GET MODE 


OCD8 Fe orci ick doko ick tok ick ick ok ck ick icici kok kk kk R eget Colour 


OCD8 Default Colour 

OCDB Colour Buffer 2. Colour 

OCE4 (Flag Indicating Colour Status) 

Set flash periods for colour display for all inks and set border. 
OCEA (Flash Periods) 

Determine flash periods (inks and border) 

OCEE (Flash Periods) 

Allocation of the two colours that are used to represent an ink. 
OCF5 Set Colour 

Allocation of the two colours that are used to represent a border. 


OCF8 FeCl  iclciickcickcicc tok akiakiciikoioicak kkk kk ARK Sep Colour 


OCFA Get Colour Matrix Register 

OCFA Get Colour Matrix Register 

0D04 Get Ink Address 

OD10 Fe cc crock cick ek tokio dak RRC et Colour Matrix Register 


Get the two colours that are used to represent an ink. 
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OD1D Get Colour 


Get the two colours that are used to represent a border. 


0D20 JOO oR oR ck ck Rok ok CRC at Colour 


0D20 Get Ink Address 
OD2C Colour Matrix 


0OD35 JOO oo rac cr RRC at Ink Address 


0D38 Colour Buffer 1. Colour 

0D42 Event Block: Set Inks 

0D46 KL DEL FRAME FLY 

0D49 Flash Inks 

OD4C Set Inks on Frame Fly 

0D52 KL NEW FRAME FLY 

0D55 Event Block: Set Inks 

0D58 KL DEL FRAME FLY 

OD5B Get Colour Composition Parameters 
ODSE MC CLEAR INKS 


OD61 2g 2k fe 2k fe 2k ee 2 2 2 2 2 2 os ok 2k 2 3k 2 2k ok 2 2 ok KS Inks on Frame Fly 


OD61 current Flash Period 

0D65 Flash Inks 

OD6B Get Colour Composition Parameters 
OD6E MC SET INKS 


OD73 2g 2k oe fe 2k 3 fe fe 2k 2k 2 2k 2 eof 2 2k 2 3 2c 2 2 2 2 2k 2k 2k 2K 2K 2K Eh] g oh, Inks 


0D73 Get Colour Composition Parameters 
0D76 (current Flash Period) 

0D79 MC SET INKS 

OD7C Colour Composition Flag 


OD&7 2k oe oe ee oe oe oko ok 2 oe ke oie oe 2 ok ok ok oi a ok ok ok oko KE KC OE Colour Composition 
Parms 


0D87 Colour Buffer 1. Colour 
OD8A (Colour Composition Flag) 
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OD8E (Flash Period 1. Colour) 
0D92 Colour Buffer 2. Colour 
0D95 (Flash Periods) 


0D99 FO cia ai a ak A ACK ICR Colour matrix 


0D99 14 04 15 1C 18 1D0C 05 
ODA1 OD 16 06 17 1E 00 1F OE 
ODA9 07 OF 12 02 131A 19 1B 
ODB1 0A 03 OB 01 08 09 10 11 


ODB9Y Fe Oc occ ec acc i Gk kkk SCR FILL BOX 


Fill predetermined window with a colour (positions character- related, 
mode-dependent). 


Fill predetermined window with a colour (positions are screen addresses, 
mode-independent). 


ODC6 SCR NEXT BYTE 
ODDE SCR NEXT LINE 
ODE2 SCR FLOOD BOX 
ODES ebb R HARE cdo jicoiioicici icici icicekiciccc SCR CHAR INVERT 


Invert foreground and background colours of a character 


ODE8 SCR CHAR POSITION 
ODF2 SCR NEXT BYTE 


ODF 8 23 Hee Rrb ro ior iccekiiicecsice: Colour Buffer Address 
ODF9 SCR NEXT LINE 


OE0O FCCC I Coca ai GRRE RS CR HW ROLL 


Moves the screen (hardware-controlled) one line down if b=0 and one line 
up if b<>0. The accumulator must contain the value for the colour that the 
new (blank) line is to have. 


OEOB MC WAIT FLYBACK 


182 


First Publishing Anatomy of the CPC's 





0E32 (High Byte Screen Start) 
0E32 SCR FLOOD BOX 
0E41 SCR SET OFFSET 


Moves a screen area under software control. a and b have to be supplied as 
for SCR HW ROLL. In addition, h must contain the column number of the 
left-hand edge of the area to be moved, | the top line, d the right-hand 
column and e the bottom line of the area. 


Make sure that column and line 0 represent the top left-hand corner of the 
screen. It is also essential to make sure that the parameters supplied actually 
define an area within the video RAM. 


OE4F SCR CHAR POSITION 
OESA MC WAIT FLYBACK 
0E64 SCR NEXT LINE 
0OE69 SCR NEXT LINE 
0E76 SCR FLOOD BOX 
OE8B SCR CHAR POSITION 
OE8F SCR CHAR POSITION 
0E93 MC WAIT FLYBACK 
0E96 SCR PREV LINE 
OE9B SCR PREV LINE 
OEE1 SCR NEXT BYTE 
OEES SCR NEXT BYTE 


DE RQ ec GG Gai iota io iciciatck kkk kak toktok 6 OR 


UNPACK 
Enlarge character matrix (for mode 0/1). 


OEF9 SCR GET MODE 


REPACK 
Reduce character matrix to its original form. 
OF2B SCR CHAR POSITION 


OF2E SCR GET MODE 
OF3C SCR NEXT LINE 
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OF48 SCR NEXT BYTE 
OF53 SCR NEXT LINE 
OF82 SCR NEXT BYTE 
OF8C SCR NEXT LINE 


HORIZONTAL 


Draw horizontal line 


VERTICAL 
Draw vertical line. 


OFAS (GRA Pen) 

OFA9 (GRA Pen) 

OFAE (GRA Pen) 

OFB1 (GRA Pen) 

OFB8 Load Accumulator with &FF 
OFF3 (GRA Paper) 

OFFF (GRA Pen) 

100A SCR NEXT BYTE 
101C (GRA Pen) 

1027 (GRA Paper) 

102C SCR WRITE 

1030 SCR PREV LINE 
1049 SCR DOT POSITION 


1052 Fee ccc icici icici vic ioicicckicedcecck ack De fart colours 


0152 04 04 0A 13 OC OB 14 15 
105A OD 06 1E 1F 07 12 19 04 
0162 17 04 04 OA 13 OC OB 14 
106A 15 OD 06 1E 1F 07 12 19 
1072 OA 07 
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2.5.5 Text Screen (TXT) 


As its name suggests, this pack is responsible for text handling. This also 
includes the organisation of the windows. 


A few words of explanation are needed about how to handle the cursor: 


The coordinates required or supplied in the cursor routines are to be taken as 
logic information, i.e. they relate to the current window. Coordinate 1,1 
represents the upper left-hand corner of the window. If you wish to position 
the cursor outside the window (e.g. using TXT SET CURSOR) the cursor 
will be set automatically to the next possible position inside the window, if 
the cursor is on or a character 1s to be displayed. 


This also alters the current position (that you obtain with TXT GET 
CURSOR). 


If the cursor is off, the new position you want will be accepted until either a 
character is displayed or the cursor is turned on. 


Complete initialisation of the Text Pack. 


1074 TXT RESET 
107E TXT set default param's 
1081 Reset param's (all windows) 


] O84 of fs of 3k 3k 2k 9fs ok of 3s ofc fs ofc fs 2 oft oft ok oe ok TXT R ES ET 
Reset the Text Pack 


1084 Restore TXT indirections 

1087 Move (hl+3) to ((hl+1)), cnt=(hl) 
108D db OF 15 bytes 

108E dw BDCD destination address 
1090 TXT DRAW/UNDRAW CURSOR 
1093 TXT DRAW/UNDRAW CURSOR 
1096 TXT WRITE CHAR 

1099 TXT UNWRITE CHAR 

109C TXT OUT ACTION 


LOOP RRR RRA RKC Reset param's (all windows) 
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10A1 Start param's window 0 

10A4 Curr. cursor position (row, column) 
10AF (Curr. screen window) 

10B3 (Curr. screen window) 

10BB TXT STR SELECT 

10BE TXT DRAW/UNDRAW CURSOR 
10C1 TXT GET PAPER 

10C4 (TXT curr. paper) 

10C7 TXT get pen 

10CA (TXT curr. pen) 

10D6 TXT STR SELECT 

10DA (TXT curr. pen) 

10DD Set default param's 


Select text window 


10E6 Curr. screen window 

10F1 Address window param's to de 
10F4 Idir cnt=15 

10F8 Addr. window param's to de 
10FC Idir cnt=15 


The parameters (colours, window limits, etc.) of two windows are swapped 
over. 


1103 (Curr. screen window) 

1108 TXT STR SELECT 

110C (Curr. screen window) 
110F Addr. window param's to de 
1114 Addr. window param's to de 
1118 Idir cnt=15 

111C TXT STR SELECT 


LI] E Arc Idir ent=15 


LE26 SES RE ES SES SESE ORES Addr. window paran's to-de 
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1135 Curr. cursor position (row, col) 
1139 fe fs 2s 2s fs 246 fe 9k 2c 2 26 2k 2k 2k 2 2k 9k 2k 2k ok Set default param's 


113C (Curr. cursor flag) 
1140 TXT SET PAPER 
1144 TXT SET PEN 

1148 TXT SET GRAPHIC 
114B TXT SET BACK 
1154 TXT WIN ENABLE 
1157 TXT VDU ENABLE 


Set horizontal position of cursor. 


115B Curr. window left 
115F (Curr. cursor pos. (row, col.)) 


Set vertical position of cursor 


1166 Curr. window top 
116A (Curr. window pos. (row, col.)) 


Position cursor 

1170 Curr. window top, left + hl 

1173 TXT DRAW/UNDRAW CURSOR 
1176 (Curr. cursor pos. (row, col.)) 
1179 TXT DRAW/UNDRAW CURSOR 
Request current cursor position 

117C (Curr. cursor pos. (row, col.)) 


117F Curr. window top, left - hl 
1182 (Curr. roll count) 
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1186 eR RRR RRR KEEEE Curr, window top, left + hl 


1186 (Curr. window top) 
118C (Curr. window left) 


1193 4H RRR RAKE AEKEK Curr, window top, left - hl 


1193 (Curr. window top) 
119B (Curr. window left) 


11A4 ie 2s ke fe 3c fs fe 2fe ofc ofc fe afc ofc ofc oie 2k 24 2k 2k 2k Move cursor 


11A4 TXT DRAW/UNDRAW CURSOR 
11A7 (Curr. cursor pos. (row, col.)) 
11AA hl within window limits? 

11AD (Curr. cursor pos. (row, col.)) 
11B2 Curr. roll count 

11BA TXT GET WINDOW 

11BD (TXT curr. paper) 

11C1 SCR SW ROLL 

11C5 SCR HW ROLL 


Cursor inside text window? 


11CA Curr. window top, left + hl 
11CD hl inside window limits? 
11D1 Current window top, left - hl 


11D6 *## RRR RRR EEE hh] inside window limits 


11D6 (Curr. window right) 
11DD (Curr. window left) 
11E2 (Curr. window left) 
11E7 (Curr. window right) 
11EF (Curr. window top) 
11F7 (Curr. window bottom) 


Determine size of current text window 
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1208 SCR CHAR LIMITS 

1229 (Curr. window top) 

122C (Curr. window bottom) 

123A (Wind. flag (O=entire screen)) 

What is size of current text window? 

1252 (Curr. window top) 

1255 (Curr. window bottom) 

1259 (Wind. flag (O=ent. screen)) 

125 F He kd tckckice ie TXT DRAW/UNDRAW CURSOR 
Set/delete cursor 

125F (Curr. cursor flag) 

1265 (ABE ek tek ee TXT PL ACE/REMOVE CURSOR 


Place cursor on screen/remove cursor from screen 


126B (TXT curr. pen) 
126F SCR CHAR INVERT 


1276 2 2 24 2k 2k cafe ofc 24 24 2k 2c fe 24 2k 2k 2k 2k ke ke TXT CUR ON 
Enable cursor (operating system) 

1279 Cur. enable cont'd 

127E 2k fe 2h fe 24 fe fe 2h 2c 2h 2k 2 24 2k 2 2k 2k ie 2k 2k TXT CUR OFF 


Disable cursor (operating system, higher priority than TXT CUR ENABLE 
and TXT CUR DISABLE) 


1281 Cur disable cont'd 


Enable cursor (user program) 
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1288 3h 2k 2s 2he 24 2 2 2 2 2g 2 2 2 2 oe ok 3k ke ok 2 Cur enable cont'd 
1289 TXT DRAW/UNDRAW CURSOR 

128E Curr. cursor flag 

1294 TXT DRAW/UNDRAW CURSOR 
Disable cursor (user program) 


L299 22 2 2 2 2 2k he 2h ee 2k 2k 2k ok 2k 2K 2K OK Cur disable cont'd 


129A TXT DRAW/UNDRAW CURSOR 
129F Curr. cursor flag 


Set foreground colour 

12A6 TXT curr. pen 

Set background colour 

12AB TXT curr. paper 

12AF TXT DRAW/UNDRAW CURSOR 
12B3 SCR INK ENCODE 

12B7 TXT DRAW/UNDRAW CURSOR 


Which foreground colour has been set? 


12BA (TXT curr. pen) 
12BD SCR INK DECODE 


12C0 3k 2 2s oie 2k 2 2 2 2g 2 2k 2 2k 2 2 ok Ko ok ok TXT GET PAPER 


Which background colour has been set? 
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12CO (TXT curr. paper) 
12C3 SCR INK DECODE 


12C6 FEE OOOO III I KK TXT INVERSE 

Invert current foreground and background colours. 

12C6 TXT DRAW/UNDRAW CURSOR 

12C9 (TXT curr. pen) 

12CF (TXT curr. pen) 

Get address of dot matrix of a character 

12D6 TXT GET M TABLE 

Set address of (user-defined) dot matrix of a given character 
12F3 TXT GET MATRIX 

Set start address and first character of a user-defined dot matrix. 
130A TXT GET MATRIX 

131E TXT GET M TABLE 

1321 (1st. character user matrix) 

1326 (Address user matrix) 


Start address and first character of a user matrix? 


132B (lst. character user matrix) 
1331 (Address user matrix) 


1335 A RK TXT WR CHAR 


Display character 
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1336 (Curr. cursor flag) 

133C Move cursor 

1340 (Curr. cursor pos. (row, col.) 
1345 TXT WRITE CHAR 

1348 TXT DRAW/UNDRAW CURSOR 
Write character to screen 

134C TXT GET MATRIX 

1353 SCR UNPACK 

1358 SCR CHAR POSITION 

1366 SCR NEXT BYTE 

136F SCR NEXT LINE 

1377 (Curr. background mode) 
Transparent mode on/off 

1384 (Curr. background mode) 

Which transparent mode? 

1388 (Curr. background mode) 

1392 (TXT curr. pen) 

13A0 (TXT curr. pen) 

13A5 SCR PIXELS 

Tum control character display on or off. 
13A8 (GRA char WR mode (0=disable)) 


Read character from screen 


13AF Move cursor 
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13B2 TXT UNWRITE CHAR 
13B6 TXT DRAW/UNDRAW CURSOR 


Read character from screen 


13BE (TXT curr. pen) 
13C6 SCR REPACK 

13DE SCR REPACK 
13EA TXT GET MATRIX 


Display or execute (control) character 


Brings the character in the accumulator onto the current screen window or 
executes it, in the case of a control character. Make sure that this routine uses 
the TXT OUT ACTION indirection. If you have "changed" it, TXT 
OUTPUT will use your routine as well and not the ROM routine. 


1402 TXT OUT ACTION 
Outputting a character on the screen or executing a control code. 


140B (GRA char WR mode (0=disable)) 
1410 GRA WR CHAR 

1413 Character counter control buffer 
1418 Control buffer full? 

141A Yes, then jump 

141C Control buffer empty? 

141D No, then jump 

1420 Control character? 

1422 No, then TXT WR CHAR 

1425 Counter +1 

142C (Start control buffer) 

1430 Branch table, control characters 
1436 Required number 

1439 Control parameters reached 
143A No, then jump 

1446 Start control buffer 
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144A Call (de) 
144E (Character counter control buffer) 


Suppress character display 

1454 Cur disable cont'd 

1459 ek Heda cick TXT VWDU ENABLE 
Characters can be written to the screen 

145B Cur enable cont'd 


1460 *##4keHHHHEHHHHHEHHH CURR, CURSOR FLAG TO 
ACCUMULATOR 


1460 (Curr. cursor flag) 

1464 SR RRA KE Cony default control character jumps 
1465 (Character control character buffer) 

1468 Default control character jumps 

146B Branch table, control characters 

146E Number of bytes 

1471 Copy 


1474 eR Ac A Default control character jumps 


1474 db 80 
1475 dw 1513 00 


1477 db 81 
1478 dw 1335 01 TXT WR CHAR 


147A db 80 
147B dw 1297 02 TXT CUR DISABLE 


147D db 80 
147E dw 1286 03 TXT CUR ENABLE 


1480 db 81 
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1481 dw OAE9 04 SCR SET MODE 


1483 db 81 
1484 dw 194005 GRA WR CHAR 


1486 db 00 
1487 dw 1459 06 TXT VDU ENABLE 


1489 db 80 
148A dw 14E1 07 Klingel 


148C db 80 
148D dw 1519 08 CRSR Left 


148F dw 80 
1490 dw 151E 09 CRSR Right 


1492 db 80 
1493 dw 1523 OA CRSR Down 


1495 db 80 
1496 dw 1528 OB CRSR Up 


1498 db 80 
1499 dw 154F OC TXT CLEAR WINDOW 


149B db 80 
149C dw 153F OD CRSR at start of line 


149E db 81 
149F dw 12AB OE TXT SET PAPER 


14A1 db 81 
14A2 dw 12A6 OF TXT SET PEN 


14A4 db 80 
14A5 dw 155E Delete 10 characters at CSRR pos. 


14A7 db 80 
14A8 dw 1599 Delete 11 lines up to CRSR pos. 


14AA db 80 
14AB dw 158F Delete 12 lines as from CRSR pos. 
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14AD db 80 
14AE dw 1578 Delete 13 windows up to CRSR pos. 


14B0 db 80 
14B1 dw 1565 Delete 14 windows as from CRSR pos. 


14B3 db 80 
14B4 dw 1452 15 TXT VDU DISABLE 


14B6 db 81 
14B7 dw 14EC 16 transparent mode on/off 


14B9 db 81 
14BA dw0C55 17 SCR ACCESS 


14BC db 80 
14BD dw 12C6 18 TXT INVERSE 


14BF db 89 
14CO dw 150D 19 SYMBOL command 


14C2 db 84 
14C3 dw 1501 1A define window 


14C5 db 00 
14C6 dw 14EB 1B no effect 


14C8 db 83 
14C9 dw 14F1 1C INK command 


14CD db 82 
14CC dw 14FA 1D BORDER command 


14CE db 80 
14CF dw 1539 1E CRSR home 


14D1 db 82 
14D2 dw 1547 1F LOCATE command 


Get address of control character branch table 
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eT 


14D4 Branch table control characters 


14E1 2 ie 2k he 2 ie 2k 2k 2 2 2 2 2 2 OK Bell 

14E6 SOUND QUEUE 

14 EC ee A nbn cic ® Transparent mode on/off 
14EE TXT SET BACK 

14F1 2fe fe fe ofc ofc 2k 2k: 2k 2s 2k > ois oe ofc 2k 2s 2k a ok INK command 

14F7 SCR SET INK 

14FA fe fe fe ae 2k 2k ke 2c 2c 2s 2s 2k 2k 2k 2k 2 2 2k BORDER command 
14FE SCR SET BORDER 

1501 ate fe 2 fe 2c 2 2g 2g 2k 2g 2 kc 2c 2 24 2c 2 2 Define window 
150A TXT WIN ENABLE 

150D fe 9p fe ofc 26 9 2 2g 2s 2k 2 2k ois 2c 2 2 ok ok SYMBOL command 
1510 TXT SET MATRIX 


1513 Move cursor 
1516 TXT DRAW/UNDRAW CURSOR 


152C Move cursor 
1539 2k 2k 2 2 2 2 2 2 2 2 oi 2k 2c oe 2 2g 2k 2k 2k ok CRSR home 


153F ehbbereononeonntce CRSR at start of line 
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153F Move cursor 
1542 (Curr. window left) 


1547 fe fe 2 2c 2c ofc fe os 2g 2 2 2k 2k ok 2k 2k 2 2k ok ok LOCATE command 

154C TXT SET CURSOR 

Clear current text window 

154F TXT DRAW/UNDRAW CURSOR 

1552 (Curr. window top) 

1555 (Curr. cursor pos. (row, col.)) 

1558 (Curr. window bottom) 

155E #8 RA CCK Delete character at CRSR pos. 
155E Move cursor 

1565 *#eeee eee OeeSEEE® Clear window from CRSR pos. 
1565 Delete 12 lines as from CRSR position 

1568 (Curr. window up) 

156B (Curr. window bottom) 

156F (Curr. window pos (row, col.)) 

1578 oo ae ok eek etek kk Clear window to CRSR pos. 
1578 Delete 11 lines up to CRSR position 

157B (Curr. window top) 

157E (Curr. window right) 

1582 (Curr. cursor pos. (row, col.)) 

1589 (TXT Curr. paper) 

158C SCR FILL BOX 


15QF F**K AKER KKKEEEEK Delete lines as from CRSR pos. 


158F Move cursor 
1593 (Curr. window right) 


1599 **R RRR HH KKK EEEEEEE Delete lines up to CRSR pos. 
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1599 Move cursor 
159E (Curr. window left) 
15A5 TXT DRAW/UNDRAW CURSOR 
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2.5.6 Graphics Screen (GRA) 
This pack is used solely for controlling the graphics window. 


The following comments relate to the coordinate parameters required by the 
various routines: 


The coordinates are transmitted in three stages. The stage closest to the user 
is the position relative to the coordinate origin (ORIGIN) that he has set. 
This is converted into a position relative to the screen origin (bottom left). 
These two stages are mode-independent! 


The last stage is the physical address of the dot. This is dependent on the 
current mode. 


These three stages are then preceded by a fourth, i.e. if a relative coordinate 
pair has to be re-calculated to an absolute position relative to ORIGIN. 


Complete initialisation of GRAPHIC PACK. 


15A8 GRA RESET 

15AB Pen 1, paper 0 
1SAF GRA SET PAPER 
15B3 GRA SET PAPER 
15B6 Set origin to 0,0 
15BB GRA SET ORIGIN 
15C6 GRA WIN WIDTH 
15CB GRA WIN HEIGHT 
1SCE GRA GET PAPER 
15D2 GRA GET PEN 


157 eee aE oeideidcekick GRA RESET 
Reset graphic pack 


15DA Restore GRA indirections 
15DD Move (hl+3) to ((hl+1)),cnt=hl 
15EO db 09 9 bytes 

15E1 dw BDDC destination address 
15E3 GRA PLOT 

15E6 GRA TEST 
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15E9 GRA LINE 


15ED SCR ACCESS 
15Fl1 GRA FILL 


[SFB Here Gnjinioiicekiciicek GRA MOVE RELATIVE 
Movement relative to current position 

15FB Add curr. cord. + rel. coord. 

1S FE eH H GbR GRA MOVE ABSOLUTE 
Movement relative to an absolute position 


15FE (Curr. X coord.) 
1602 (Curr. Y coord.) 


1606 fe 24g 2 2c oie 2c 2k 2c 2k 2k 2k 2c 2k 2g 2 2c 2 2k 2k GRA ASK CURSOR 
Where is the current graphics cursor? 


1606 (Curr. X coord.) 
160A (Curr. Y coord.) 


Set origin of the user coordinates 
160E (X origin) 
1612 (Y origin) 
161A GRA MOVE ABSOLUTE 


Get origin of the user coordinates 


161C (X origin) 
1620 (Y origin) 


1624 ee nlekkiciecke Get phys. start position 
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1624 GRA ASK CURSOR 

1627 *e RR RRR KERR KEKE Get phys. destination position + set cur. 
1627 GRA MOVE ABSOLUTE 

162A FeRRRRRR RRR REEEERES CONVERT GRA COORD. 
162B SCR GET MODE 

1640 (X origin) 

1655 (Y origin) 

165D #7 8a Ra kk eK A dd curr, coord. + rel. coord. 
165E (Curr. X coord.) 

1664 (Curr. Y coord.) 

166A (X coord. GRA window left) 

1673 (X coord. GRA window right) 

1680 (Y coord. GRA window top) 

1689 (Y coord. GRA window bottom) 

1694 Get phys. destination position + set cur. 

Set left and right-hand limits of graphics window 

16BE SCR get mode 

16C9 (X coord. GRA window left) 

16CD (X coord. GRA window right) 


Set upper and lower limits of graphics window 


16FB (Y coord. GRA window top) 
16FF (Y coord. GRA window bottom) 


Left and right-hand limits of graphics window? 


1717 (X coord. GRA window left) 
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171B (X coord. GRA window right) 
171E SCR GET MODE 


Upper and lower limits of graphics window? 


172D (Y coord. GRA window top) 
1731 (Y coord. GRA window bottom) 


1736 2h 2g 2 2c ie 2c ie ke 2c 2 2g 2k 2c 2k 2k 2c 2k 2k 2k ok GRA CLEAR WINDOW 
Clear graphics window 

1736 GRA GET W WIDTH 

1746 (Y coord. GRA window bottom) 

174A (Y coord. GRA window top) 

1753 (X coord. GRA window left) 

1759 SCR DOT POSITION 

175D (GRA paper) 

1761 SCR FLOOD BOX 

1767 fe fe 2c fe fe 2h 2c 2k 24 fe 24k 2c ake is 2c 2k 2k 2k 2k GRA SET PEN 


Set write colour 


1767 SCR INK ENCODE 
176A (GRA pen) 


Set background colour 


176E SCR INK ENCODE 
1771 (GRA Paper) 


Which write colour? 
1775 (GRA pen) 


V7 TA. RR a a 2 a 2 2 2 2K 2 2 KK GRA GET PAPER 
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Which background colour? 


177A (GRA paper) 
177D (SCR INK DECODE) 


Set graphics dot relative to current cursor position 
1780 Add curr. coord. + rel. coord. 

Set graphics dots (absolute) 

1783 GRA PLOT 

Represent a dot on the screen 

178A SCR DOR POSITION 

178D (GRA pen) 

1791 SCR WRITE 

1794 FoR RICK GRA TEST RELATIVE 
Dot set (relative to current cursor)? 

1794 Add curr. coord. + rel. coord. 

Dot set (absolute)? 

1797 GRA TEST 

Indicates the ink of the current graphic position 


179D GRA GET PAPER 
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17A0 SCR DOT POSITION 
17A3 SCR READ 


Draw line from current to relative distance 

17A6 Add curr. coord. + rel. coord. 

Draw line from current to absolute position 

17A9 GRA LINE 

7 AC BBB H RoR GRA MASK PARAM RESCUE 
Rescue parameter from the BASIC command MASK 

17 BO FRR RRA RA RR KE GRA MASK PARAM RESCUE 
Rescue parameter from the BASIC command MASK 

Draw a line 


17B9 Get phys. destination position + set cursor 
17BD (Arithmetic buffer X coord.) 
17CC (Arithmetic buffer Y coord.) 
188C Get phys. start position 

188F (Arithmetic buffer X coord.) 
1893 (Arithmetic buffer Y coord.) 
18A2 (Arithmetic buffer Y coord.) 
18AD (Arithmetic buffer Y coord.) 
18B2 (Arithmetic buffer Y coord.) 
18B9 (Y coord. GRA window top) 
18C3 (Y coord. GRA window bottom) 
18C8 (Arithmetic buffer X coord.) 
18DA (Arithmetic buffer X coord.) 
18E6 (Arithmetic buffer X coord.) 
18EF (Arithmetic buffer X coord.) 
18FA (Arithmetic buffer X coord.) 
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18FF (Arithmetic buffer X coord.) 
1906 (X coord. GRA window right) 
1910 (X coord. GRA window left) 
1915 (Arithmetic buffer Y coord.) 
1928 (Arithmetic buffer Y coord.) 
1934 (Arithmetic buffer Y coord.) 


Write a character at the current graphics cursor position 


1942 TXT GET MATRIX 
1948 Get phys. start position 
1962 SCR DOR POSITION 
1973 SCR NEXT BYTE 
197B SCR NEXT LINE 
1985 GRA ASK CURSOR 
1989 SCR GET MODE 
1998 GRA MOVE ABSOLUTE 
19AC SCR DOT POSITION 
19C4 (GRA pen) 

19CE (GRA paper) 

19D2 SCR WRITE 


19D9 (Arithmetic buffer X coord.) 
19DF (Arithmetic buffer Y coord.) 
19E3 SCR INK ENCODE 

19E9 Get phys. start position 

1A19 (Arithmetic buffer X coord.) 
1A25 (Arithmetic buffer Y coord.) 
1A2C (Arithmetic buffer Y coord.) 
1A44 (Arithmetic buffer X coord.) 
1A9F (Arithmetic buffer Y coord.) 
1AA9 (Arithmetic buffer Y coord.) 
1AC1 (Arithmetic buffer X coord.) 
1AE8 (GRA Y coord. GRA window top) 
1B10 SCR PREV LINE 

1B18 (Y coord. GRA window bottom) 
1B25 SCR NEXT LINE 
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1B35 (GRA pen) 

1B45 SCR DOT POSITION 
1B51 SCR DOT POSITION 
1B56 SCR DOT POSITION 
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2.5.7 The Keyboard Manager (KM) 


This pack has the task of monitoring the keyboard and of translation into 
usable character code. When performing this periodic scanning of the keys, 
it uses the EVENT mechanism. 


I BSC #8 8A IC K VT INTITIALISE 


Complete initialisation of keyboard management. The condition of keyboard 
management before KM INITIALISE is called is lost. 


1B5F KM SET DELAY 

1B68 (Shift lock state) 

1B80 Key translation table 

1B8A Key state map 

1B8D During scan depressed keys 


L B98 #4 RK KT RESET 


Keyboard management is restored to its initial condition. The indirect 
branch table and the keyboard management buffer are neutralised. 


1BA4 Exp. buffer cont'd 

1BA7 Restore KM indirection 

1BAA Move (hl+3) to ((hl+1)),cnt=(hl) 
1BBO KM DISARM BREAK 

1BB3 db 03 3 bytes 

1BB4 dw BDEE destination address 
1BB6 Test break 


1BBF Kee he 2 fe 2h oe 2c 2 i 2c 2 2 2 2 OK OK KM WAIT CHAR 
Gets a character from the input buffer or expansion string or Put Back 
Buffer. If no character is available, the routine does not return but waits. In 


the event of success, the accumulator contains the entered character. 


1BBF KM READ CHAR 
1BC2 KM WAIT CHAR 


1BC5 eR AK AK A KK KK KK AK KV READ CHAR 


Also gets a character (see KM WAIT CHAR) if there is one. Does not wait 
for the next character. If the carry flag is set after the return from the 
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routine, this means that the attempt has been unsuccessful. 


1BC6 Put back buffer 

1BC9 Get character 

1BCA Clear buffer 

1BCC Was a character there? 
1BCD If so, jump 

1BCF (Exp. string pointer) 
1BD2 High byte to accumulator 
1BD3 Exp. string present? 
1BD4 If so, jump 

1BD6 KM READ KEY 
1BD9 Jump if no character 
1BDB Is character <128? 
1BDD If <128, then jump 
1BE8 KM GET EXPAND 
1BFO (Exp. string pointer) 


1BF8 Accumulator =&FF 
1BFA 246 24s fe 24e 24s fe fe 24 24 2 24 2h fc cc 2c 2c 2k 2 ke KM CHAR RETURN 


Put a cracter in the keyboard buffer for next access (KM READ CHAR or 
KM WAIT CHAR). 


1BFA (Put back buffer) 
1BFE KM READ CHAR 
1004 eH eed aeisioioiiocioiiicek KVL EXP BUFFER 


Allocate memory for expansion string (address, length). 
Initialise buffer. 


1C04 Exp. buffer cont'd 

1COA 246 24e 2fe 24 24 fe afc 2 afc fe afc fe 2c 2h 2c 2c 2c 2k 2k 2 Exp. buffer cont'd 
1C13 (Pointer end exp. buffer) 

1C17 (Pointer start exp. buffer) 

1C1A ASCII 


1C1D 0 
1C1F To 
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1C20 9 

1C21 To 

1C22 Expansion 

1C23 Buffer 

1C25 Restore 

1C26 Default exp. string 

1C35 (Pointer free exp. buffer) 


1C3C Hk AAA AK KEKEK Default exp. string 


1C3C 01 2E 01 0D 05 52 55 4E ....RUN 
1C44 220D ue 


1C46 fe 2he 2h 2h 2 2 fe fe 2c 2c 2c 2 2k 2 i 2 2 2k 2k KM SET EXPAND 
Set up expansion string 

1C47 Address exp. string to de 

1C4A Jump if token invalid 

1C4E Clear exp. buffer 

1C6A 246 26 2 2 2 He 2 ee 2h he 2c he 2h 2c 2 2k 2k Clear exp. buffer 
1C79 Room for a new exp. string? 

1C85 (Pointer free exp. buffer) 

1C8A (Pointer end exp. buffer) 

1C93 Room for new exp. string? 

1C96 (Pointer free exp. buffer) 

1C1A (Pointer free exp. buffer) 

1CAT ##*##8444eeeeEEEEEES Room for a new exp. string? 
1CA7 (Pointer free exp. buffer) 

1CB3 ke fe 2h 2k 2 24e 2c ke he 2k 2k 2k 2k 2k ok 2k ok KM GET EXPAND 


Get character from expansion string. Starting from zero, the characters of 
the character string are numbered consecutively. 


1CB3 Address exp. string to de 


1CC3 246 fe ae 2h a 2 fe 2k he 2 2c 2k 4c 2k 2 ok 2 a 2k ak Address exp. string to de 
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1CC3 Token in the valid 

1CCS range? 

1CC7 Return if not 

1CC9 (Pointer start exp. buffer) 
1CDO Move hl on by 

1CD1 the length of 

1CDE the expansion string 


1CDB Feo RK KV WATT KEY 


Waits until the next key is pressed, if a character is not immediately 
available. Only searches the input buffer and not the Expansion String and 
Put Back Buffer (see KM WAIT CHAR). 


1CDB KM READ KEY 
1CDE KM WAIT KEY 


1CE1 eR RK KR KK KK KAKKEEK K VT READ KEY 


Gets the key number, if a key has been pressed. Does not wait if there is not a 
character available immediately. Expansion String and Put Back Buffer not 
taken into account. 


1CFB Caps lock state 

1D12 Shift lock state 

1D17 Caps lock? 

1D1A If not, jump 

1D1D Toggle caps lock 

1D27 KM GET CONTROLS 
1D2B (Shift lock state) 

1D32 KM GET SHIFT 

1D35 KM GET TRANSLATE 


1D38 fe 2he 2h fe fe 2fe 2fe 2fe 2fe 2h 2k 2c fe fe 24 2fe 24 2k 2 2k KM GET STATE 
Check whether CAPS LOCK and SHIFT LOCK keys have been operated. 
1D38 (Shift lock state) 


1D3C ARC Set state 


1D3C (Shift lock state) 
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1D40 24s 2fe 2fe 2 afc 2c afc 2c 2c 2he 2c 2 ake 2c 2c 2k 2 2 ak ok KM UPDATE KEY STATE MAP 
1D40 Miultihit contr. to B63F 

1D43 During scan depressed keys 

1D46 Scan keyboard 

1D4C Isolate SHIFT/CTRL 

1D4F Key 16...23 

1D54 Multihit contr. to B63F 

1D57 Key state map 

1D74 Test break 

1D86 Key state map 

1D8B (Address of repeat table) 

1D9E (KM delay) 

1DB8 he 2h 2h 2 he fe 2h 2h 2c 2c 2c a 2h 2 2c 2c 2c 2 2k KM TEST BREAK 


1DC1 KM BREAK EVENT 
1DCE KM BREAK EVENT 


1DE5 2 2fe 3 2h 2 2h 3 2h 2h 2 2c ae 2 2 2k 2c 2k 2k KM GET JOYSTICK 


The status of the joystick at the time of interrogation is determined with the 
help of the Key State Map. 


1DES (Joystick 1) 
1DEB (Joystick 0) 


1DF2 34 He fe 2h 2 fe 2c 2 2h 2c 2 ke 2 2k ke ok a a KM GET DELAY 
Get parameters for key repetition function and speed. 
1DF2 (KM delay) 

1DF6 3K fe 2h 2c 3 2fe 2c 2h 2h 2c 2k 2h 2c 2 2k 2k 2 a 2 KM SET DELAY 
Set key repetition function and speed. 

1DF6 (KM delay) 

1DFA 38 He 2k 3 24 2c 2 2c 2 2 2k 2 2 2 a 2 2 a KM ARM BREAK 


Enable the Break key 
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1DFA KM DISARM BREAK 

1DFD Break event block 

1E02 KL INIT EVENT 

1E0B fe oe 2h oe 2h 2c he 2 i 2 he 2 2c 2k 2k 2 2 KM DISARM BREAK 
The Break key is disabled 

1E13 KL DEL SYNCHRONOUS 

1E19 24 246 2k 2h 2 fe 26 2 he 2c 2k he 2 2 2c 2 2 2 KM BREAK EVENT 
Execute routines actuating the break key 

1E24 KL EVENT 

1E2F 24 2h 2k he 26 2c 2 fe 2c 2 he he 2k i 2c 2 oe kee KM GET REPEAT 


Check whether a given key is one with a set repeat function 


1E2F (Address of repeat table) 
1E32 Set Z acc. key bit 


1E34 eR RRR KAT SET REPEAT 


An entry in the repeat key table determines whether the key has a repeat 
function. In this case, the key number is to be stored in the accumulator. If 
the key is to repeat, b must contain &FF. If, on the other hand, b contains 
&00, the repeat function is removed for the key concerned. 


1E34 Key > 80 

1E36 Yes, then invalid 

1E37 (Address of repeat table) 
1E3A Get bit corresp. key # 


1E45 2H ee ee 2 ie 2 2 KK KT TEST KEY 


The condition of the Key State Map is used to see if a key or a joystick has 
been actuated. 


1E46 (Key 16...23) 


1E49 Isolate SHIFT/CTRL 
1E4D Key state map 
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1ESO Get bit corresp. key # 
1E53 Mask key bit 


1E55 fe fe fe fe he he 2c 2h 2h 2c 2 2 2 2 2 2 2 ke Ke Get bit corresp. key # 
1E55 Key # 

1E59 /8 

1ESF Address key map 

1E62 Bit masks 

1E65 Load bit 

1E67 corresponding 

1E68 to the 

1E69 key 

1E6D fe 2he 2c 2c 2 fe fe fe fe he 2c 2c 2c 2 ae he 2c 2 2 oe Bit masks 

1E6D 01 02 04 08 10 20 40 80 

1EC4 246 2h 2h 2c 2c 2c 2c 2c 2c 2h fe fe 2h 2c 2c 2 2c 2 2 2 KM GET TRANSLATE 
Get entry from the first level of the keyboard table (Key State Map). 


1EC4 (Address key translation table) 
1EC7 Get key table 


1EC9 FEI ICC III I RR AR III VI GET SHIFT 
Get entry from second level of keyboard table. 


1EC9 (SHIFT Key Table Address) 
1ECC Get Key Table 


1ECC FAC GR A ak Ik i tek kd RK GET 


CONTROL 
Get entry from third level of keyboard table 
1ECE (CTRL Key Table Address) 


1ED1 FECA CACC OI I I IAI Cet Key Table 


1ED8 FGI II I IO IO OR OI tek ke doko toe K SET 


TRANSLATE 
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Make entry in first level of keyboard table 


1ED8 (Key Translation Table Address) 
1EDB Set Key Table 


LEDD  *% #4 4 8 4 KK KK KK EEE KK SET 


SHIFT 
Make entry in second level of keyboard table 


1EDD (SHIFT Key Table Address) 
1EEO Set Key Table 


1EE2 246 2h ee 2h ee 2 ee 2k ee hee 2 kee 2 he ee A CK AK EK SET CONTROL 


Make entry in third level of keyboard table 
1EE2 (CTRL Key Table Address) 


1EE5 24 2 2h he 2 hee 2h he 2 2h he 2 2 hee 2 he 2h 2h 2 2 ie 2 2k 2k eo kk A kK KK Sat Key Table 


1EEF FEAELENEELLECEESERELERS ESSER ERERL ELA Cy Translation Table 


1EEF FO F3 Fl 89 86 83 8B 8A 
1EF7 F2 E0 87 88 85 81 82 80 
1EFF 10 5B OD 5D 84 FF S5C FF 
1F07 SE 2D 40 70 3B 3A 2F 2E 
1FOF 30 39 6F 69 6C 6B 6D 2C 
1F17 38 37 75 79 68 6A 6E 20 
1F27 31 32 FC 710961 FD7A 
1F37 OB OA 08 09 58 5A FF 7F 


1F3F PEARL EEE EE LEE ERE EY ERERLELESESRRTEN KC CY SHIFT Table 


1F37 F4 F7 F5 89 86 83 8B 8A 
1F47 F6 EO 87 88 85 81 82 80 
1F4F 107B 0D 7D 84 FF 60 FF 
1F57 A3 3D 7C 50 2B 2A 3F 3E 
1FSF 5F 29 4F 49 4C 4B 4D 3C 
1F67 28 27 55 59 48 4A 4E 20 
IF6F 26 25 52 54 47 46 42 56 
1F77 24 23 45 57 53 44 43 58 
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IF7F 21 22 FC 51 09 41 FDSA 
1F87 OB 0A 08 09 58 5A FF 7F 


1F8F Pa MASE EREL OTST SEST TE See eee Tee ee se eee eee ee Key CTRL 


Table 


1F8F F8 FB F9 89 86 83 8C 8A 
1F97 FA EO 87 88 85 81 82 80 

1F9F 10 1B OD 1D 84 FF 1C FF 
1FA7 1E FF 00 10 FF FF FF FF 
1FAF 1F FF OF 09 OC OB OD FF 
1FB7 FF FF 15 19 08 OA OE FF 
1FBF FF FF 12 14 07 06 02 16 

1FC7 FF FF 05 17 13 04 03 18 

1FCF FF7E FC 11 E101 FE1A 
1FD7 FF FF FF FF FF FF FF 7F 
1FDF 07 03 4B FF FF FF FF FF 
1FE7 AB 8F 
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2.5.8 Sound Manager (SOUND) 


Although this pack covers quite a broad scope, there is little to say about it. 
Tone generation itself plays an infinitely small part, while the lion's share is 
taken up by the management of the different queues. This also includes the 
production of the TONE ENVELOPE, which the Programmable Sound 
Generator (PSG) cannot do for itself. 


If you really want to bring forth those silvery tones from your CPC, it is best 
to program the PSG directly since the routines of the SOUND MANAGER 
are interrelated with the corresponding BASIC commands. While BASIC 
can get the CPC to warble a cheery tune, you will have to go into machine 
language if you want to program some good percussion effects. This is the 
only way you will be able to weave together complex sounds in swift 
succession. 


1FE9 9k he fe 2h 24 fe ae fe 2h he ae fe fe 2fe 2h 2k fe 2fe fe ake 2 af 2fe fe 2h 2k 2fe fe 2fe 2c 2k fe fe fe 24 2fe 2k ke 2k fe fe 2k 2 2k 2k 2k 2 oe SOUND 


RESET 
Reset the entire SOUND MANAGER. Delete all queues. 


1FF3 Sound event 
1FF8 KL INIT EVENT 
2000 SOUND param's channel A 


2050 fe 2 fee 2h 2h 2h 2h fe fe 2fe 2fe fe fe fe 2fe fe 2k ke fe fe fe 2fe oe fe fe fe 2fe 2h 2k 2k fe fe fe ofc ofc fe 2h oe fe he 2c 2fe 24 2c 2 2k SOUND 


HOLD 
Hold all tones, can be cancelled by means of SOUND CONTINUE. 


2050 Curr. SOUND activity 
2058 Channel active? 

2059 If not, return 

205C Volume 

205E of all channels 

2060 to0 

2063 MC SOUND REGISTER 


206B SR RC KEKE SOUND CONTINUE 


Continue processing previously held tones (SOUND HOLD). 
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206B (Old SOUND) 
206E Act. (after HOLD)) 
206F Channel active? 
2070 If not, return 

2076 Reset 

2079 all volume 

207A onold 

207D channels 


208B Ke ae 2h 2 fe 2c ae fe 2c 2 2c 2 fe 2s 2k i 2k 2 2 Ok Sound event 


209D Channel active? 
209F No, then next 


QOD 7 4 2 a a a 2 2 2 ee eH Scan sound queues 


20D7 Curr. sound activity 
2111 KLevent 


2114 8 he 2h He 2h 2k e242 2 he 2 2 2 2k a SOUND QUEUE 
Add tone to the queue. 

2114 SOUND CONTINUE 

21AC 8 He 2h 2 he 2h 2 fe 2c 2 2c 2 2 2 2 2k OK oa SOUND RELEASE 
Enable tones 

21AD SOUND CONTINUE 

21CE Ke He 2 He 2h fe fe 2c 2 2c 2k 24 2k 2h 2k 2 2 2 2 SOUND CHECK 
Is there still room in the queue? 

2206 KL EVENT 

2258 Curr. SOUND activity 

227D KL EVENT 

2296 SOUND param's channel A 

229E SOUND param's channel B 

22A6 SOUND param's channel C 


22B8 SOUND param's channel C 
22C0O SOUND param's channel B 
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22F3 Load sound generator 
22F5 MC SOUND REGISTER 
2303 Volume envelopes 

2342 Set volume 

237D Envelope 

237F MC SOUND REGISTER 
2383 Envelope length Lo 

2385 MC SOUND REGISTER 
2389 Envelope length Hi 

238B MC SOUND REGISTER 
2390 Set volume 


23DB 2h fe 2h 2 2h 2 2 24 2 he 2 2 2c 2 ie 2c oe 2 2 Set volume 

23E2 Volume 

23E4 MC SOUND REGISTER 

23EF Curr. SOUND activity 

2403 Channel control register 

2405 MC SOUND REGISTER 

240C SOUND T ADRESS 

2486 Tone pitch Lo 

2489 MC SOUND REGISTER 

248F Tone pitch Hi 

2492 MC SOUND REGISTER 

2495 346 2h 2 He fe fe 2h 2c fe 24s 2c 2c 2 he fe he 2c 2 2k SOUND AMPL ENVELOPE 
Put the event block on the alert in case a place in the queue becomes free. 


2495 Volume envelopes 
2498 Copy envelopes 


249A 246 2h 2h 2h 2k 2 2 fe fe 2h 2c 2c 2k 2k 2c 2 2 2 SOUND TONE ENVELOPE 
Set up volume envelope (15 different amplitudes) 

249A Tone envelopes 

249D #k REE Cony envelope 

249E Get envelope address 


QAA6 #2 REECE SOUND A ADDRESS 
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Get address of a volume envelope 


24A6 Volume envelopes 
24A9 Get envelope address 


24AB fe 24s fe fe e242 2c fe 3 24 2c 2h 2k 2 2 2c 2k 2k 2 SOUND T ADDRESS 
Get address of tone envelope 
24AB Tone envelopes 


24 AE *HeRRRK EEK R EERE Get envelope address 


220 


First Publishing Anatomy of the CPC's 


2.5.9 Cassette Manager (CAS) 


Don't worry, we are aware that your computer has a built-in disk drive, 
which makes cassettes practically or entirely superfluous. However, we do 
not want to neglect this opportunity of presenting the CASSETTE 
MANAGER; it contains a number of basic routines that you ought to know. 


24BC 24 He hee He ee 2 ke ke ke fe ee 2 ke ie He hee ee ie ke ke ee 2k ie ie ee 2k ek 2k ok KC AS 


INITIALISE 
Complete initialisation of the Cassette Pack 


24BC CAS IN ABANDON 
24C3_ CAS NOISY 


QA CE (RRS EEO III IIA IIR AIICIK CAS SET 


SPEED 
Set write speed 


24D9 (Cassette Speed) 


24 Eee ea Redc da aciicidcaidiciaiiicciiciaiiciiiickieIIK CAS SET 


SPEED 


Cassette messages on/off. Error messages are excluded from the inhibiting 
of cassette messages. 


24E1 (Cassette Message Flag) 


AES eA BCs cco ciaiaiioicaaiioi aici ioiok ac iciok kak kak Ack a ek 10K CAS TN 


OPEN 


Opens an entry file. For this purpose, the length of the filename in b, the start 
address of the filename in hl and the start address in de of a 2K RAM range, 
used as an input buffer, must be transmitted to the routine. 


After the return, hl contains the start address of the File Header; a, bc and de 
contain other values obtained from the header. However, you can take these 
values whose start address you have in hl, of course, from the header 
yourself. 


The carry and zero flags provide information on the results of the action: 
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Carry=1 and zero=0 mean that everything is OK. 
Carry=0 and zero=0 means that another file has already been opened. 
Carry=0 and zero=1 mean that the ESC key has been pressed. 


24ES Input Buffer Status 
24E9 Cassette Open 
24ED Read File Header 


24FE 246 2k 2a he 2k 2 He he 2 He ke 2 He he 2 He ee He ee He he he ke 2 he he ee 2 ee 2 He A A A KC AS OUT 
OPEN 

An output file is opened. The input parameters and the meanings of the flags 
are the same as for CAS IN OPEN, the only difference being that de of 
course has to contain the start address of the output buffer. 


24FE Output Buffer Status 


DS OD 2 a 2 2 He ee 2h 2 2 He he he 2h he he he 2h 2 He he he 2h 2 2 he he 2 2 2 ke 2k 2k ke 2 KKK Ca ocette 


Open 


2550 2h he he 2h 2 he he 2h 2h 2 He he 2h 2 Hee he 2 He he he 2h 2 he he 2h 2 ee he 2 ee he he 2 ee he 2 kk KC AS IN 


CLOSE 
Correct closure of the input file. 


2550 (nput Buffer Status) 


2557 BY He He 2 2k ke He He 2 2 2k 2k he He ee 2k ie ke ee 2 2 ke 2k ee ee 2 2k 2 KK KK CAS IN 


ABANDON 
Interrupt reading immediately and close input file (in the event of an error). 


2557 Input Buffer Status 


257F 2¥e fe 2 2 2k 2k kee ee 2 2k 2k ee ee 2 2 2 2 KK RK KKK KEKECAS QUT 


CLOSE 
Correct closure of the output file. 


257F (Output Buffer Status) 
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ABANDON 


Close output file immediately and identify the output device as "closed". Any 
data not yet written is destroyed. 


2599 Output Buffer Status 


25A0 246 2h 2h 2 He he ke 2 He he he he hee He he he 2 He he he he 2 2c hee he ie 2 2 he he ee 2 2 2 Hk kk KC AS IN 


CHAR 


Gets a character from the input buffer and transmits it to the accumulator. If 
it is the last character from the buffer, a new block is automatically read into 
the buffer from the cassette. 


Carry=0 and zero=0 mean that the end of the file (EOF) has been reached or 
that the file has not been opened. All other combinations as for CAS IN 
OPEN. 


25A5 Check Input Buffer Status 
25B0 Read File Header 

25BC (Pointer Input Buffer) 
25BF 1d a,(hl) 

25C1 (Pointer Input Buffer) 


25C6 FEC CCI AC I ICICI I II RC A ACK CAS OUT 


CHAR 


Writes the character in the accumulator to the output buffer. If the buffer is 
full, it is automatically written to cassette. 


The meanings of the flags are as for CAS IN CHAR and CAS IN OPEN. 
25CA Output Buffer Status 

25CF Check Buffer Status 

25EA (Pointer Output Buffer) 

25EF (Pointer Output Buffer) 


25F6 24 ee 2 2 he ee 2 2h he he ee 2k he ee 2 2 hee 2 2k 2k KK Check Input Buffer Status 


25F6 Input Buffer Status 


25F9 Ae OSOI aa aa acai ioioicicioicicicicieckkitctokeee® Check Buffer Status 
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2603 AA CCI III I I IEC AS TEST 


EOF 
Enquiry as to whether end of file has been reached. 
2603 CAS IN CHAR 


2607 2H He He eee He He ee 2 ee kee ee he he ee 2k ee ke ke ee ke ek KC AS 


RETURN 
Last read character back to the buffer. 


260F (Pointer Input Buffer) 
2613 (Pointer Input Buffer) 


DIRECT 
Transfer entire input file to storage, not character-by-character reading. 


261B (Check Input Buffer Status) 
2631 Read File Header 

263C (Address Start Input Buffer) 
2647 KL LDIR CONTINUED 
2650 KL LDDR CONTINUED 


2653 AC CI CI ICG I I I IC IG I A IC AS OUT 


DIRECT 
Write predetermined storage area to cassette (not via the buffer). 


2656 Output Buffer Status 
265B Check Buffer Status 
266E (Address Start Output Buffer) 
2685 (Address Start Output Buffer) 


CATALOG 
Outputting a cassette catalogue from the screen. 


2692 Input Buffer Status 
269C (Address Start Input Buffer) 
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26Al1 CAS NOISY 
26A9 CAS IN ABANDON 


26AC AIC OO a ek kK EKER ead File 


Header 


26C3 CAS READ 

26E0 (Input Buffer Status) 

26EF (Address Start Input Buffer) 
26F2 (Pointer Input Buffer) 

26F7 CAS READ 

271B Input Buffer Status 

2743 (File Header Input) 

274E File Header Input 

2760 File Header Input 

277B CAS OUT CLOSE 

2781. CAS MOTOR STOP 

2790 File Header Output 

279E (Address Start Output Buffer) 
27A1 (Pointer output buffer) 

27A8 File header output 

27B0 CAS WRITE 

27BC CAS WRITE 

27D9 Output buffer status 

27F5 CAS START MOTOR 

2807 (Cass. message flag) 

2846 TXT WR CHAR 

2871 Output CAS message (1 character) 
2886 Output CAS message (# in b) 
288C Output CAS message (1 character) 


2891 2 2h 2h 3 2h fe fe 2c fe 2h 2k fe 2k 2k fe 2k 2c 2k 2k ie Output CAS message (# in b) 


2891 TXT GET CURSOR 

289D Cassette messages 

28C9 Output cass. message (1 character) 
28D0 Output cass. message (1 character) 
28D2 (Cass message flag) 

28D8 Output cass. message (# in b) 
28DB KM READ CHAR 

28DE TXT CUR ON 

28E1 KM WAIT KEY 

28E4 TXT CUR OFF 


225 


First Publishing Anatomy of the CPC's 





28FO * eR RRR RHE EEAEEEEES Output cass. message (1 character) 


28FO TXT OUTPUT 

28F7 TXT SET COLUMN 

28FE TXT GET WINDOW 

2902 TXT GET CURSOR 

2924 Output cass. message (1 character) 
292F (Input buffer status) 


2935 2he 3 fe 2c fe 2h 2 he 2c 2 2c 2 2 2k ke 2 OK Cassette messages 


2935 Press 
293B PLAY 
293F then 
2943 any 
2946 key 
294B error 
2955 REC 
2958 and 
295D Read 
2963 Write 
296A Rewind 
2970 tape 
2975 Found 
297D Loading 
2985 Saving 
298D ok 
2990 block 
2996 Unnamend 
299D file 


29A6 2Fe 2k fe 2 2h He 2k fe 2 2k 2 2k he 2 2k a 2k KK CAS READ 


Read a block from the cassette. Is called by priority 
routines. 


29A6 Motor on & open keyboard 
29AF 3k oe he 2c 2 he 2c 2 ke 2k 2 2 a 2 KK CAS WRITE 


Write a block to cassette. As for CAS READ, is called by priority routines. 
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29AF Motor on & open keyboard 
29Cl1 246 fe 2h 2 2c 9c 24 2 2he 2k 2he 2 i 2k he 2k 2 2c ee CAS CHECK 
Compare block on the tape with memory content. 


29C1 Motor on & open keyboard 
29D2 Port A=Out 

29D7 Motor on 

29DE CAS RETORE MOTOR 


29E3 FRR RRR EAE EKEEE Motor on & open keyboard 


29EA SOUND RESET 

29FO CAS START MOTOR 

29F4 Sound I/O port select 

29F9 Strobe on 

29FE Strobe off 

2A02 Port A=In 

2A07 Open keyb. Y9 (ESC) 

2A0A & Sound I/O on Port A 

2A3C RAM LAM (Ix) 

2A67 RAM LAM (IX) 

2A95 Cass. input RD DATA & test ESC 
2A9D Cass. input RD DATA & test ESC 
2AB2 Cass. input RD DATA & test ESC 


2B3D * eR REE EE Cass, input RD DATA & Test ESC 


2B3D Port A 

2B3F Keyb. X 

2B41 ESC? 

2B43 If so, return 

2B4D Port B 

2B55 Input RD DATA 

2B8E WR DATA off 

2B90 Cass. output WR DATA 
2B9F WR DATA on 

2BA1 Cass. output WR DATA 


QBAT 8 a I Cass. output WR DATA 


2BB1 Port control 
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2BB3 WR DATA 

2BBB 24s ee 2h 26 2 he 2h 24s 2 2 2 2 2 2 ok CAS START MOTOR 
Cassette motor on. 

2BBD CAS RESTORE MOTOR 

2BBF i he 2k fe 2c 2 he 2 he 2 ae 2 2 2 a KK CAS STOP MOTOR 
Cassette motor stop. 

2BC1 246 26 26 e246 24 2h 2 2 9 2c 26 2 9 2k 2 2 ok ok CAS RESTORE MOTOR 


Restores the previous condition of the motor. After motor switch- on, there 
is a period of waiting until it reaches nominal rpm. 


2BC2 Port C 


2BCE Motor on/off 
2BE9 KM TEST KEY 
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2.5.10 Screen Editor (EDIT) 


The SCREEN EDITOR, by contrast with the components of the L ROM 
discussed, is not used at all by the operating system. Strictly speaking, it is 
not, then, a pack in the same way as the others. The SCREEN EDITOR 
should be associated, rather, with the arithmetic routines, which are also 
started solely using BASIC. 


We do not find it meaningful to use the routines of the SCREEN EDITOR 
individually; at best, the editor can only be used as a whole. For this purpose, 
you have to supply hl with the start address of the text you wish to edit. This 
text must contain a maximum of 255 characters, which corresponds, in fact, 
to the maximum length of a BASIC line. 


2C02 


2fe Fee 6 Fe 2 He 2k 2k 2 he 2h 2 He he 2 2 he 2k 2 2 he 2h ee Ae 2 he he 2h 2 he he 2 2 he he 2 2 he ee 2 oe ok 2 2 ok KK KK DTT 


2C1A EDIT Perform Jump 

2C1A EDIT Perform Jump 

2C1D Pointer to the Application Buffer 
2C1E Signal in the Count Buffer 

2C24 (Insert Flag) 

2C2D Signal from the Keyboard 


2C42 AIC I RR kk RK ED) TT Perform 


Jump 


2C49 EDIT Jump Table 1 

2C4E Signal in the Buffer? 

2C50 Jump if yes 

2C52 Is it Keyboard cursor? 

2C54 jump if not 

2C56 Keyboard Cursor and SHIFT/CTRL? 
2C58 jump if yes 

2C5A EDIT Jump Table 2 


2C72 ARC RR RR RRR R DTT Jump Table 


1 
2C72 db 13 Number Entry 
2C73 dw 2D8A Insert Signal 
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2C75 db FC 
2C76 dw 2CD0O ESC 


2C78 db EF 
2C79 dw 2CCE no Effect 


2C7B db OD 
2C7C dw 2CF2 ENTER 


2C7E db FO 
2C7F dw 2D3C CRSR UP(Buffer) 


2C81 db Fl 
2C82 dw 2D0A CRSR DOWN(Buffer) 


2C84 db F2 
2C85_ dw 2D34 CRSR LEFT (Buffer) 


2C87 db F3 
2C88 dw 2D02 CRSR RGHT(Buffer) 


2C8A db F8 
2C8B dw 2D4F CTRL & CRSR UP 


2C8D db F9 
2C8E dw 2D1D CTRL & CRSR DWN 


2C90 db FA 
2C91 dw 2D45 CTRL & CRSR LEFT 


2C93 db FB 
2C94 dw 2D14 CTRL & CRSR RGHT 


2C96 db F4 
2C97 dw 2E21 SHFT & CRSR UP 


2C99 db F5 
2C9A dw 2E26 SHFT & CRSR DWN 


2C9C db F6 
2C9D dw 2E1C SHFT & CRSR LEFT 


2C9F db F7 
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2CA0 dw 2E17 SHFT & CRSR RGHT 


2CA2 db EO 
2CA3 dw 2E65 COPY 


2CAS db 7F 
2CA6 dw 2DC3 DEL 


2CA8 db 10 
2CA9 dw 2DCD CLR 


2CAB db El 
2CAC dw 2D81 CTRL & TAB (Toggle Inset) 


QCA E, 86 46 44 1 HH A A HE HR HH HH HH HAA DTT Jump Table 2 
2CAE db 04 Number Entry 
2CAF dw 2CFE Bell 


2CB1 db FO 
2CB2 dw 2CBD CRSR UP 


2CB4 db Fl 
2CB5 dw 2CC1 CRSR DWN 


2CB7 db F2 
2CB8 dw 2CC9 CRSR LEFT 


2CBA db F3 
2CBB dw 2CCS CRSR RGHT 


2CBD 246 2h fe 2 fe 2 fe 2 fee 2k He 2h he 2h he 2k he 2h he 2h he 2h he 2 he 2 2h 2 he 2 he 2 he 2 2k he 2 he 2 ke 2 3 EK CR SR UP 


2CCl1 2te fe fe fe 2 ee fe 2k ke ee he he he 2h 2h ee he ke ke 2k ee he he ke ke ke 2 2 ee ke ee 2 2 2k ee kK CR OR 


DWN 


2CC5 2¥e 2 eke 2 He 2k 2 eke ee 2h 2 he he 2k eke 2 he he 2 he he 2 he he 2k 2 he hee he ke 2 he he ke 2k ee 2k 2k 2 CR SR 


RGHT 


2CC9 2th 2h 2h He He he he 2h 2 He He he he 2 2 2 he He he he 2 2 he he ee 2 2 ee ee ee 2 2 ke 2 KKK CCR OR 


LEFT 


231 


First Publishing Anatomy of the CPC's 


2CCB TEXT OUTPUT 
2CDO 


2H ee 2h ee 2 ee 2 A He He Ae He eR He A HH A KR AL OC 


2CDO ENTER 

2CD4 *BREAK*-Message 
2CD7 ENTER 

2CDA TXT GET CURSOR 
2CEO CR 

2CE2 TXT OUTPUT 
2CE5 CRSR DWN 


2CEA 3 ee 2 ee ee ee ee ee ie fe 2 2 ae ee ie fe oie fe fe ode fe ode ode oe oie oe ke ke ke ke ok oe ok ok ke 


*BREAK*-Message 

2CEA 2A 4272 65 61 6B 2A 00 *BREAK* 

2CF1 He eee ke ee 2 ee 2 2 2 ee kk kk A IHR NIT RR 
2CFC Set the Carry Flag 


2CFE 


FEA ICAI CCCI RRR CCE RC A_B RT J 


2CFE BELL 


2D02 2 He ee He 2 ee eo ek eke ke kk kd de OK EK CR OR 


RGHT(Buffer) 


2D07 BELL 


2D0A SEC IC A GG GC I Re CR SR DWN 


(Buffer) 
2D39 BELL 


(Buffer) 


2D41 BELL 


2D45 FESS ake kek tick i kk a i a a ee AAC CTR YT & CRSR 
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LEFT 


2D4F 2fe fee fe 2 eke 2 eke 2 ke 2 2 ieee kee ee ek ke A KA KKAEEEKCTRE & CRSR 


UP 


2D74 TXT GET WINDOW 
2D7B TXT GET CURSOR 


2D81 2H 2 he 2k He kee he ke ke ee ke ee I A AK AA KA CTRT & TAB(Toggle 
Insert) 


2D81 (Insert Flag) 
2D85 (Insert Flag) 


2D8A 24 2 fee fee 2K fe fe fe fe 2 Fee fee 2 He 2k 2 ke 2 2k 2 2 2 2 ee 2k 2 kK KAKA cert Signal 


2D8D (Insert Flag) 
2DA1 BELL 


2DC3 24 he 2 fee 2 ke 2 2 fee 2 He 2 2k fe 2 2k He 2h kee 2k he 2 hee 2h ee ee 2 ee He A ACK AKAD) RT 


2DC8 BELL 


2DCD 24 2 fee 2 ee 2h ee 2h he He 2h hee 2h ee he ee he ee he ee ee 2 He A ek A KK AK AACA CT RQ 


2DCF BELL 
2EOE TXT VALIDATE 


2E17 24 2 fe 2 ee 2h He 2k he 2 hee he he 2h he 2 kee he hee 2 2 2 ee ek AK SLT RT: & CRSR RGHT 


Q2E1C 246 2 fee hee kee 2h he 2k He 2 he 2 ee ee ee ee ee ee 2 ek He AK SULT & CRSR LEFT 


2E21 2fe 26 24 fe 2 fe 2 fe 2 fe 2 2k He 2k he 2k he 2 ke He ke ke 2 ek ek HE SULT & CRSR UP 


2E26 2fe He fee fe ke he 2 He he 2h He He he hee He ee He ee He AK KA AEE QHET & CRSR 


DWN 


2E2E TXT GET CURSOR 

2E37 TXT VALIDATE 

2E4A TXT PLACE/REMOVE CURSOR 
2E4F TXT PLACE/REMOVE CURSOR 
2E57 TXT GET CURSOR 
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2ESB TXT SET CURSOR 
2E62 TXT SET CURSOR 


2E65 


24 2 2 ee hee he he 2 he he 2 he 2 he ee 2 ee he 2h he 2 2 he 2 hee 2 hee he 2 hee 2 2 2 kK COC) PY 


2E67 TXT GET CURSOR 
2E74 TXT GET CURSOR 
2E7C TXT SET CURSOR 
2E7F TXT PLACE/REMOVE CURSOR 
2E82 TXT RD CHAR 
2E87 TXT SET CURSOR 
2E8E TXT VALIDATE 
2E9C Insert Signal 

2E9F BELL 

2ED3 TXT GET CURSOR 
2ED9 TXT VALIDATE 
2EDD TXT OUTPUT 
2EE7 TXT GET CURSOR 
2EF4 TXT SET CURSOR 
2F07 TXT GET CURSOR 
2FOE TXT VALIDATE 
2F19 TXT VALIDATE 
2F2A TXT GET CURSOR 
2F2F TXT VALIDATE 
2F3C TXT WR CHAR 
2F40 TXT GET CURSOR 


2F56 Rene Renan at week eee eee eee Oa! from the Keyboard 


2F56 TXT GET CURSOR 
2F5A TXT VALIDATE 
2F60 KM WAIT CHAR 
2F63 TXT CUR ON 
2F66 TXT GET CURSOR 
2F6D KM WAIT CHAR 
2F70 TXT CUR OFF 
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2.6 The Character Generator 


The book is big enough as it is but we simply feel that the character set is an 
important tool which, even in the BASIC set of commands, is given a few of 
its own. 


To save yourself the trouble of re-inventing the wheel each time you, for 
example, generate special characters, all you have to do is to find the 
appropiate bits and add them together. The reason for you to understand the 
characters already available can be simply put: 


You will certainly have noticed that all the vertical line elements are 
composed of at least two adjacent dots. The reason for this is that you would 
find it difficult to locate just one pixel on your screen in isolation; this would 
be even more difficult on a colour screen than on a green monitor because 
the "slot mask" would also get in the way and that a single dot could, of 
course, coincide with one of its bars. 


So, bear the above in mind when defining your own characters and always 
use pairs of dots with vertical lines. But look first of all just in case you can 
find a usable character among the 256 of the CHARACTER GENERATOR 
of the CPC 464/664/6128. 
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3800 FF 
3801 C3 
3802 C3 
3803 c3 
3804 C3 
3805 C3 
3806 C3 
3807 FF 
3810 18 
3811 18 
3812 18 
3813 18 

3814 18 
3815 18 
3816 18 
3817 FF 
3820 oc 
3821 18 

3822 30 
3823 7E 
3824 oc 
3825 18 

3826 30 
3827 00 

3830 00 
3831 01 

3832 03 
3833 06 
3834 cc 
3835 78 

3836 30 
3837 00 

3840 00 
3841 00 
3842 30 
3843 60 
3844 FF 
3845 60 
3846 30 
3847 00 
3850 18 
3851 18 

3852 18 
3853 18 
3854 DB 
3855 7E 
3856 3C 
3857 18 
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CHARACTERS 
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3868 00 
3869 03 
386A 33 
386B 63 
386C FE 
386D 60 
386E 30 
386F 00 
3878 3C 
3879 66 
387A C3 
387B DB 
387C DB 
387D C3 
387E 66 
387F 3c 
3888 3c 
3889 7E 
388A DB 
388B OB 
388C OF 
388D C3 
388E 66 
388F 3c 
3898 3c 
3899 66 
389A C3 
389B FB 
389C DB 
389D OB 
389E 7E 
389F 3c 
38A8 00 
38A9 01 
38AA 33 
38AB 1E 
38AC CE 
38AD 7B 
38AE 31 
38AF 00 
38B8 03 
38B9 03 
38BA 03 
38BB FF 
38BC 03 
38BD 03 
38BE 03 
38BF 00 
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38C0 FF 
38C1 66 
38C2 3c 
38C3 18 
38C4 18 
38C5 3c 
38C6 66 
38C7 FF 
38D0 3c 
38D1 66 
38D2 66 
38D3 30 
38D4 18 
38D5 00 
38D6 18 
38D7 00 
38E0 FF 
38E1 DB 
38E2 DB 
38E3 DB 
38E4 FB 
38E5 c3 
38E6 c3 
38E7 FF 
38FO FF 
38F1 C3 
38F2 C3 
38F3 OF 
38F4 0B 
38F5 DB 
38F6 DB 
38F7 FF 
3900 00 
3901 00 
3902 00 
3903 00 
3904 00 
3905 00 
3906 00 
3907 00 
3910 6C 
3911 6C 
3912 6C 
3913 00 
3914 00 
3915 00 
3916 00 
3917 00 
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392018 3928 00 
3921 3E 3929 «C6 
3922 «58 392A CC 
3923 3C 3928 «18 
3924 1A 3926 30 
3925 7C 392D 

3926 6:18 392E CB 
3927 00 392F 00 
3930 38 3938 «18 
3931 -6C 3939 «18 
3932-38 393A 30 
3933 76 3938 00 
3934 DC 3936 00 
3935 CC 393D 00 
3036 «676 393E 00 
3937 00 393F 00 
3940 = 0C 3948 30 
3941-18 394918 
3942-30 394A OC 
3943 30 3943 0C 
3944-30 3946 08 
3045 18 3940-18 
3946 = OC 394E 30 
3947 00 304F 00 
3950 00 3958 00 
3951 66 3959-18 
3952 © 3C 395A 18 
3953 FF 395B  7E 
3954 3C 3956 18 
3955 66 395D 18 
3956 00 395E 00 
3957 00 395F 00 
3960 00 3968 00 
3961 00 3969 00 
3962 00 396A 00 
3963 00 3968 = 7E 
3964 00 396C 00 
3985 18 396D 00 
3966 6 18 396E 00 
3967 30 396F 00 
3970 00 3978 = 06 
3971 00 3979 0G 
3972 00 397A «18 
3973 4200S CL Tr 3978 30 
3074 2900S CLT YT 3976 «60 
307518 |S Ce 3970 CO 
3076 18S QU 397E 80 
3977 00 397F 00 
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3980 7c 
3981 C6 
3982 CE 
3983 D6 
3984 E6 
3985 C6 
3986 7c 
3987 00 
3990 3c 
3991 66 
3992 06 
3993 3c 
3994 60 
3995 66 
3996 7E 
3997 00 
39A0 1C 
39A1 3C 
39A2 6C 
39A3 CC 
39A4 FE 
39A5 oc 
39A6 1E 
39A7 00 
39B0 3C 
39B1 66 
39B2 60 
39B3 7C 
39B4 66 
39B5 66 
39B6 3C 
39B7 00 
39C0 3c 
39C1 66 
39C2 66 
39C3 3C 
39C4 66 
39C5 66 
39C6 3c 
39C7 00 
39D0 00 
39D1 00 
39D2 18 
39D3 18 
39D4 00 
39D5 18 
39D6 18 
39D7 00 
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39E0 0c 
39E1 18 
39E2 30 
39E3 60 
39E4 30 
39ES 18 
39E6 0c 
39E7 00 
39F0 60 
39F1 30 
39F2 18 
39F3 oc 
39F4 18 
39F5 30 
39F6 60 
39F7 00 
3A00 7c 
3A01 C6 
3A02 DE 
3A03 OE 
3A04 DE 
3A05 co 
3A06 7c 
3A07 00 
3A10 FC 
3A11 66 
3A12 66 
3A13 7c 
3A14 66 
3A15 66 
3A16 FC 
3A17 00 
3A20 F8 
3A21 6C 
3A22 66 
3A23 66 
3A24 66 
3A25 6C 
3A26 F8 
3A27 00 
3A30 FE 
3A31 62 
3A32 68 
3A33 78 
3A34 68 
3A35 60 
3A36 FO 
3A37 00 
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3A40 66 3A48 7€ 
3A41 66 3A49 18 

3A42 66 3A4A 18 

3A43 7E 3A4B 18 

3A44 66 3A4C 18 

3A45 66 3A4D 18 
3A46 66 3A4E 7E 
3A47 00 SA4F 00 
3A50 1E 3A58 E6 
3A51 oc 3A59 66 
3A52 oc 3A5A 6C 
3A53 oc 3A5B 78 
3A54 cc 3A5C 6C 
3A55 cc 3A5D 

3A56 78 3ASE E6 
3A57 00 SASF 00 
3A60 FO 3A68 C6 
3A61 60 3A69 EE 
3A62 60 3A6A FE 
3A63 60 3A6B FE 
3A64 62 3A6C D6 
3A65 66 3A6D C6 
3A66 FE SAGE C6 
3A67 00 SA6F 00 

3A70 C6 3A78 38 

3A71 E6 3A79 6C 
3A72 F6 3A7A C6 
3A73 DE 3A7B C6 
3A74 CE 3A7C C6 
3A75 C6 3A7D 6C 
3A76 C6 3A7E 38 

3A77 00 3A7F 00 

3A80 FC 3A88 38 

3A81 66 3A89 6C 
3A82 66 3A8A C6 
3A83 7c 3A8B C6 
3A84 60 3A8C DA 
3A85 60 3A8D cc 
3A86 FO SABE 76 

3A87 00 3A8F 00 

3A90 FC 3A98 3C 
3A91 66 3A99 66 

3A92 66 3A9A 60 

3A93 7C 3A9B 3c 
3A94 6C 3A9C 06 

3A95 66 3A9D 66 

3A96 E6 3A9E 3c 
3A97 00 3AQF 00 
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3AAQ—s7E SAAB «66. 
3AA1 SA 3AA9 «6G 
3AA2 «18 3AAA «6G 
3AA3—s«*18 3AAB «6G 
3AA4 ‘18 SAAC «66. 
3AA5 «18 3AAD 66 
SAAB 3 3AAE 36 
3AA7—s00 SAAF 00 
3ABO 66 3aBB C6 WC 
3AB1 66 3AB9 C6 a 
3AB2 «68 

3AB3 «66 

3AB4 «68 

3AB5 3 

3AB6 «18 

3AB7 00 

3ACO—- C6 

3AC1 6 

3AC2 —-38 

3AC3. 38 

3AC4—s 6G 

3AC5—s C6 

3AC6 ss C6 

3AC7—00 

3AD0 ~—s FE 

3AD1 C6 

3AD2 ss 8C 

3AD3 «18 

3AD4 32 

3AD5 «66. 

3AD6 = FE 

3AD7 — 00 

3AEO ~—- CO. 

3AE1 60 

3AE2 30 

3AE3 «18 

3AE4 OC. 

3AE5 06 

3AE6 02 

3AE7 00 

3AFO 18 

3AF1 = -3C. 

3AF2 7E 

3AF3 «18 

3AF4 18 

3AF5 «18 

3AF6 18 

3AF7 00 
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3B00 
3B01 
3B02 
3B03 
3B04 
3B05 
3B06 
3B07 


3B10 
3B11 
3B12 
3B13 
3B14 
3B15 
3B16 
3B17 


3B20 
3821 
3822 
3B23 
3824 
3B25 
3B26 
3B27 


3B30 
3B31 
3B32 
3B33 
3B34 
3B35 
3B36 
3B37 


3B40 
3B41 
3B42 
3B43 
3B44 
3B45 
3B46 
3B47 


3B50 
3B51 
3B52 
3B53 
3B54 
3B55 
3B56 
3B57 





CHARACTERS 
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3B08 00 
3B09 00 
3B0A 78 
3B0B oc 
3B0C 7c 
3B0D cc 
3BOE 76 
3BOF 00 
3B18 00 
3B19 00 
3B1A 3c 
3B1B 66 
3B1C 60 
3B1D 66 
3B1E 3c 
3B1F 00 
3B28 00 
3B29 00 
3B2A 3c 
3B2B 66 
3B2C 7E 
3B2D 60 
3B2E 3C 
3B2F 00 
3B38 00 
3B39 00 
3B3A 3E 
3B3B 66 
3B3C 66 
3B3D 3E 
3B3E 06 
3B3F 7c 
3B48 18 
3B49 00 
3B4A 38 
3B4B 18 
3B4C 18 
3B4D 18 
3B4E 3c 
3B4F 00 
3B58 EO 
3B59 60 
3B5A 66 
3B5B 6C 
3B5C 78 
3B5D 6C 
3BS5E E6 
3B5F 00 
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3B60 38 3B68 00 
3B61 18 3B69 00 
3B62 18 3B6A 6C 
3B63 18 3B6B FE 
3B64 18 3B6C D6 
3B65 18 3B6D D6 
3B66 3C 3B6E C6 
3B67 00 3B6F 00 
3B70 00 3B78 00 
3B71 00 3B79 00 
3B72 DC 3B7A 3c 
3B73 66 3B7B 66 
3B74 66 3B7C 66 
3B75 66 387D 66 
3B76 66 3B7E 3C 
3B77 00 3B7F 00 
3B80 00 3B88 00 
3B81 00 3B89 00 
3B82 DC 3B8A 76 
3B83 66 3B8B cc 
3B84 66 3B8C cc 
3B85 7C¢ 3B8D 7¢ 
3B86 60 3B8E oc 
3B87 FO 3B8F 1E 
3B90 00 3B98 00 
3B91 00 3B99 00 
3B92 DC 3B9A 3C 
3B93 76 3B9B 60 
3B94 60 3B9C 3c 
3B95 60 3B9D 06 
3B96 FO 3B9E 7C 
3B97 00 3B9F 00 
3BA0 30 3BA8 00 
3BA1 30 3BA9 00 
3BA2 7C 3BAA 66 
3BA3 30 3BAB 66 
3BA4 30 3BAC 66 
3BA5 36 3BAD 66 
3BA6 1c 3BAE 3E 
3BA7 00 3BAF 00 
3BBO 00 3BB8 00 
3BB1 00 3BB9 00 
3BB2 66 3BBA C6 
3BB3 66 3BBB D6 
3BB4 66 3BBC D6 
3BB5 3C 3BBD FE 
3BB6 18 3BBE 6C 
3BB7 00 3BBF 00 
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3BC0 
3BC1 
3BC2 
3BC3 
3BC4 
3BC5 
3BC6 
3BC7 


3BD0 
3BD1 
3BD2 
3BD3 
3BD4 
3BD5 
3BD6 
3BD7 


3BEO 
3BE1 
3BE2 
3BE3 
3BE4 
3BE5 
3BE6 
3BE7 


3BFO 
3BF1 
3BF2 
3BF3 
3BF4 
3BFS 
3BF6 
3BF7 


3C00 
3C01 
3002 
3003 
3004 
3005 
3C06 
3007 


3010 
3C11 
3012 
3013 
3014 
3015 
3016 
3C17 


S5m88 88385888 


SmvBo 


76 


88888888 8888888 


oooo 
namTT 


8888 


CHARACTERS 
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3C20 3028 FO 
3021 3C29 FO 
3C22 3C2A = FO. 
3C23 3C2B. ss FO. 
3024 3C2C. FO 
3025 3C2D —s- FO 
3026 3C2E FO 
3027 3C2F FO 
3C30 3C38 FF 
3C31 3C39 FF 
3C32 3C3A—s FF 
3033 3C3B.—s«FF 
3C34 3C3C ~—- FO. 
3C35 3C3D = FO. 
3C36 3C3E FO 
3C37 3C3F FO 
3c40 = 00 3048 FO 
3041 00 3C49 FO 
3042 00 3C4A = FO. 
3C43. (00 3C4B. Ss FO 
3044 OF i 3C4C «OOF: 
3C45 OF i 3C4D OOF: 
3C46 OF i 3C4E OF 
3047 OF i 3C4F OF 
3C50 OOF u 3C58 FF 
3C51 OF a 3C59 FF 
3C52 OF " 3C5A ss FF 
3C53 OF © 3C5B.sdFF 
3C54 OF " 3C5C—s«OOF: 
3C55 OF a 3C5D OF 
3C56 OF " 3C5E OF 
3C57 OF r 3C5F OF 
3c60 00 3C68 FO 
3C61 00 3C69 FO 
3C62 00 3C6A = FO. 
3C63 00 3C6B- Ss FO. 
3C64 FF 3C6C 3s FF 
3C65 FF 3C6D ~—s FF 
3C66 FF 3C6E FF 
3C67 FF 3C6F FF 
3c70 «OF 3C78 FF 
3C71 OF 3C79 FF 
3C72 OF 3C7A FF 
3C73 OF 3C7B. dF 
3C74 FF 3C7C Ss FF 
3C75 FF 3C7D ~—s FF 
3C76 FF 3C7E FF 
3C77 FF 3C7F FF 
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3C80 00 3C88 18 
3C81 00 3C89 18 
3C82 00 3C8A 18 
3C83 18 3C8B 18 
3C84 18 3C8C 18 
3C85 00 3C8D 00 
3C86 00 3C8E 00 
3C87 00 3C8F 00 
3C90 00 3098 18 
3C91 00 3C99 18 
3C92 00 3C9A 18 
3093 1F 3C9B 1F 
3094 1F 3C9C OF 
3C95 00 3C9D 00 
3C96 00 3C9E 00 
3C97 00 3C9F 00 
3CA0 00 3CA8 18 
3CA1 00 3CA9 18 
3CA2 00 3CAA 18 
3CA3 18 3CAB 18 
3CA4 18 3CAC 18 
3CA5 18 3CAD 18 
3CA6 18 3CAE 18 
3CA7 18 3CAF 18 
3CBO 00 3CB8 18 
3CB1 00 3CB9 18 
3CB2 00 3CBA 18 
3CB3 OF 3CBB 1F 
3CB4 1F 3CBC 1F 
3CB5 18 3CBD 18 
3CB6 18 3CBE 18 
3CB7 18 3CBF 18 
3CCO 00 3CC8 18 
3CC1 00 3CC9 18 
3CC2 00 3CCA 18 
3CC3 F8 3CCB F8 
3C0C4 F8 3CCC FO 
3CC5 00 3CCD 00 
3CC6 00 3CCE 00 
3CC7 00 3CCF 00 
3CD0 00 3CD8 18 
3CD1 00 3CD9 18 
3CD2 00 3CDA 18 
3CD3 FF 3CDB FF 
3CD4 FF 3CDC FF 
3CD5 00 3CDD 00 
3CD6 00 3CDE 00 
3CD7 00 3CDF 00 
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CHARACTERS 


3D40 
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3DA0 3DA8 38 
3DA1 3DA9 6C 
3DA2 3DAA C6 
3DA3 3DAB FE 
3DA4 3DAC C6 
3DAS 3DAD 6C 
3DA6 3DAE 38 
3DA7 3DAF 00 
3DB0 3DB8 00 
30B1 3DB9 00 
3DB2 3DBA 66 
3DB3 3DBB 66 
3DB4 3DBC 66 
3DB5 3DBD 7c 
3DB6 3DBE 60 
3DB7 3DBF 60 
3DC0 00 3DC8 00 
3DC1 00 3DC9 00 
3DC2 00 3DCA 00 
3DC3 FE 3DCB 7E 
3004 6C 3DCC D8 
3DC5 6C 3DCD D8 
3DC6 6C 3DCE 70 
3DC7 00 3DCF 00 
3DD0 03 3DD8 03 
3DD1 06 3DD9 06 
3DD2 oc 3DDA oc 
3DD3 3c 3DDB 66 
3DD4 66 3DDC 66 
3DD5 3c 3DDD 3c 
3DD6 60 3DDE 60 
3DD7 co 3DDF co 
3DE0 3DE8 00 
3DE1 3DE9 00 
3DE2 3DEA 66 
3DE3 3DEB C3 
3DE4 3DEC DB 
3DE5 3DED DB 
3DE6 3DEE 7E 
3DE7 3DEF 00 
3DFO 3DF8 00 
3DF1 3DF9 7C¢ 
3DF2 3DFA C6 
3DF3 3DFB C6 
3DF4 3DFC C6 
3DFS 3DFD 6C 
3DF6 3DFE EE 
3DF7 3DFF 00 
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3E00 18 
3E01 30 
3E02 60 
3E03 co 
3E04 80 
3E05 00 
3E06 - 00 
3E07 00 
3E10 00 
3E11 00 
3E12 00 
3E13 01 
3E14 03 
3E15 06 
3E16 oc 
3E17 18 
3E20 18 
3E21 3c 
3E22 66 
3E23 c3 
3E24 81 
3E25 00 
3E26 00 
3E27 00 
3E30 00 
3E31 00 
3E32 00 
3E33 81 
3E34 C3 
3E35 66 
3E36 3c 
3E37 18 
3E40 18 
3E41 30 
3E42 60 
3E43 C1 
3E44 83 
3E45 06 
3E46 0c 
3E47 18 
3E50 18 
351 3C 
3E52 66 
3E53 C3 
3E54 C3 
3E55 66 
3E56 3 
3E57 18 
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3E60 03 3E68 co 
3E61 07 3E69 EO 
3E62 OE 3E6A 70 
3E63 1C 3E6B 38 
3E64 38 3E6C 1C 
3E65 70 3E6D OE 
3E66 EO 3E6E 07 
3E67 co 3E6F 03 
3E70 cc at 

3E71 cc @w 

3E72 3 «OCs 

3E73 3 06 

3E74 cc wf 

3E75 cc 

3E76 33 

377 33 

3E80 FF 

3E81 FF 

3E82 00 

3E83 00 

3E84 00 

3E85 00 

3E86 00 

3E87 00 

3E90 00 

391 00 

3E92 00 

3E93 00 

3E94 00 

3E95 00 

3E96 FF 

3E97 FF 

3EA0 FF 

3EA1 FE 

3EA2 FC 

3EA3 F8 

3EA4 FO 

3EA5 EO 

3EA6 co 

3EA7 80 

3EBO 3 «01 

3EB1 03 

3EB2 07 

3EB3s«OOF 

3EB4 1F 

3EB5 = SF 

3EB6 = 7F 

3EB7 FF 
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3ECO AA 
3EC1 55 
3EC2 AA 
3EC3 55 
3EC4 00 
3ECS 00 
3EC6 00 
3EC7 00 
3ED0 00 
3ED1 00 
3ED2 00 
3ED3 00 
3ED4 AA 
3ED5 55 
3ED6 AA 
3ED7 55 © 
3EE0 AA 
3EE1 54 
3EE2 A8& 
3EE3 50 
3EE4 AO 
SEES 40 
3EE6 80 
3EE7 00 
3EFO 01 
3EF1 02 
3EF2 05 
3EF3 OA 
3EF4 15 
SEFS 2A 
3EF6 55 
3EF7 AA 
3F00 7E 
3F01 FF 
3F02 99 
3F03.. FF 
3F04 BD 
3F05 C3 
3F06 FF 
3F07 7E 
3F10 38 
3F11 38 
3F12 FE 
3F13 FE 
3F14 FE 
3F15 10 
3F16 38 
3F17 00 
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3F20 3F28 10 
3F21 3F29 38 
3F22 3F2A 7c 
3F23 3F2B FE 
3F24 3F2C FE 
3F25 3F2D 10 
3F26 3F2E 38 
3F27 3F2F 00 
3F30 3F38 00 
3F31 3F39 3C 
3F32 3F3A 7E 
3F33 3F3B FF 
3F34 3F3C FF 
3F35 3F3D 7E 
3F36 3F3E 3C 
3F37 3F3F 00 
3F40 3F48 00 
3F41 3F49 7E 
3F42 3F4A 7E 
3F43 3F4B 7E 
3F44 3F4C 7E 
3F45 3F4D 7E 
3F46 3F4E 7E 
3F47 SF4F 00 
3F50 3F58 3c 
3F51 3F59 66 
3F52 3F5A 66 
3F53 3F5B 66 
3F54 3F5C 3c 
3F55 3F5D 18 
3F56 3F5E 7E 
3F57 3FSF 18 
3F60 3F68 18 
3F61 3F69 1c 
3F62 3F6A 1E 
3F63 3F6B 1B 
3F64 3F6C 18 
3F65 3F6D 78 
3F66 3F6E F8 
3F67 3F6F 70 
3F70 99 3F78 10 
3F71 5A 3F79 38 
3F72 24 3F7A 38 
3F73 C3 3F7B 38 
3F74 C3 3F7C 38 
3F75 24 3F7D 38 
3F76 5A 3F7E 7C 
3F77 99 3F7F D6 
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3F80 18 3F88 18 
3F81 3c 3F89 18 
3F82 7E 3F8A 18 
3F83 FF 3F8B 18 
3F84 18 3F8C FF 
3F85 18 3F8D = 7E 
3F86 18 3F8E 3c 
3F87 18 3F8F 18 
3F90 10 3F98 08 
3F91 30 3F99 oc 
3F92 70 3F9A—s«OE: 
3F93 FF 3F9B FF 
3F94 FF 3F9C FF 
3F95, 70 3F9D ~—s«OE: 
3F96 30 3F9E oc 
3F97 10 3F9F 08 
3FA0 00 3FA8 00 
3FA1 00 3FA9 00 
3FA2 18 3FAA FF. 
3FA3 3c 3FAB FF 
3FA4 7E 3FAC = 7E 
3FA5 FF 3FAD  —3C 
3FA6 FF 3FAE 18 
3FA7 00 3FAF 00 es 
3FBO ~—-:&80 3FBB) «2 Je 
3FB1 EO 3FB9.~=s«OE: | 
3FB2 F8 3FBA —-:3E z 
3FB3. FE 3FBB. Ss ii 
3FB4 F8 3FBC = -:'E a 
3FB5 EO 3FBD «OE ty 5 
3FB6 ~—s 80 3FBE 3002s) 
3FB7 00 3FBF = 00 cacceaue 
3FCO 8—-:38 3FC8 38 
3FC1 38 3FC9—s:38 
3FC2 92 3FCA =: 10 
3FC3 7C 3FCB CFE 
3FC4 10 3FCC ~—-:10 
3FC5 «28 3FCD =. 28 
3FC6 = «28 3FCE 44 
3FC7 «28 3FCF = 82 
3FD0 = :38 3FD8 = -38 
3FD1 38 3FD9—s:38 
3FD2 12 3FDA — 90 
3FD3 7C 3FDB =7C 
3FD4 90 3FDC  —_:12 
3FD5S 28 3FDD ~=—_- 28 
3FD6 = -:24 3FDE 48 
3FD7 «22 3FDF = 88 
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3FEO 00 3FE8 3C 
3FE1 3C 3FE9 FF 
3FE2 18 3FEA FF 
3FE3 3c 3FEB 18 
3FE4 3c 3FEC oc 
3FE5 3c 3FED 18 
3FE6 18 3FEE 30 
3FE7 00 3FEF 18 
3FFO 18 3FF8 00 
3FF1 3c 3FF9O 24 
3FF2 7E 3FFA 66 
3FF3 18 3FFB FF 
3FF4 18 3FFC 66 
3FF5 7E 3FFD 24 
3FF6 3c SFFE 00 
3FF7 18 FFF 00 
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3 BASIC 


3.1. The BASIC Interpreter 


The CPC has a fast, convenient BASIC Interpreter that sits in 16K bytes of 
ROM and is the same for all CPC computers. It occupies addresses &C000 to 
&FFFF, parallel to the screen RAM. The range available for BASIC 
programs and variables extends from &0170 to &A67B, i.e. 42249 bytes in 
all. 


The Interpreter supports practically all the capabilities offered by the 
hardware and the operating system. These include, in particular, the screen 
output with up to 8 windows, the high resolution graphics, Sound and Event 
processing. As a result, it is possible, using BASIC, to run several "jobs" 
concurrently. In addition, the BASIC Interpreter offers integer arithmetic 
with 16-bit numbers (values ranging from -32768 to 32767 and floating 
point arithmetic with an 8-bit exponent of two and a 32-bit fixed point part, 
guaranteeing an accuracy of 9 decimal places for a range of values between 
+/-1E-39 and +/-1E+38. 


Floating point arithmetic does not form part of the BASIC Interpreter but is 
contained in the operating system ROM (addresses &2F73 to &37FF). Like 
the other operating system functions, they are called via the branch table in 
the upper RAM area (&BBO0O to &BDF4), which can be modified if 
necessary. 


The BASIC Interpreter also makes for convenient program creation, editing 
and execution. Programs are created using the AUTO command, and edited 
using the EDIT command which, thanks to the capabilities of the operating 
system, is practically as efficient as a screen editor, as well as the RENUM, 
MERGE and DELETE commands. There is no lack of assistance, either, 
when it comes to executing a program. For example, ON ERROR GOTO can 
be used to deal with errors, DEFtyp can be used to define types of 

variables, fields can be deleted selectively using ERASE, numbers can be 
input and output in decimal, binary or hexadecimal form; then there are 
user-defined functions with several arguments and all data types and 
program structures, such as IF...THEN...ELSE, FOR...NEXT and 
WHILE...WEND. It is just as easy to reassign function and other keys as to 
define one's own special characters on the screen. A TRACE command is 
available, as well as the all- purpose PRINT USING command. 
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Now that we have traced the broad outlines, we shall be taking a somewhat 
closer look at the way in which BASIC lines are entered and saved, as well as 
the functions performed by the BASIC interpreter. Not only will this 
knowledge enable you to squeeze the "very last drop" out of the BASIC 
Interpreter, it will also serve as a basis for writing your own BASIC 
expansions, a few examples of which are given below. 


Entering BASIC lines: 


When you enter a BASIC line, it is first of all transferred to a 256 byte 
buffer located between addresses &ACA8 and &ADAT7. The entry is 
contained here in uncoded text. If the line begins with a line number, it is 
converted into a 16-bit binary number and stored in a second buffer for the 
converted line. This buffer has a capacity of 300 characters and is located 
before the BASIC program from addresses &40 to &16F. The input line is 
then searched for BASIC key words. These key words are replaced by a 
byte, or so-called Token. For example, 'AFTER' becomes TOKEN &80. 
The tokens of all the command words and the BASIC operators such as '="' 
and 'AND' have values greater than 127; the 7th bit is therefore set. BASIC 
functions, such as EXP or ROUND, have tokens of between 0 and &7F. To 
distinguish them from the normal ASCII characters, they are identified by 
the prefix &FF. The colon used to separate two statements is represented by 
the code &01, while an end of line is terminated by &00. If a string of letters 
cannot be identified as a command or a function, it is treated as a variable 
name. A variable name can have a length of up to 40 characters, all of which 
are significant. No distinction is made between lower case and capitals. Let 
us suppose that we have entered the following line: 


start=77 

The following will be placed after the line number: 

&OD &00 &00 &73 &74 &61 &72 &F4 &EF &19 &4D &00 

&0D denotes a variable without a type identifier. Then come two zero bytes; 
we shall come back to these later. Then comes the name of the variable, the 
ASCII code for s, t, a and r. For the last character, 't', &80 is added to the 
ASCII code &74 (the highest-order bit is set) and we thus obtain &F4. The 
code &EF is the token for '='. The following &19 announces a one-byte 
constant; &4D is equal to 77. The final 0 indicates the end of the line. 


The line number is preceded by two other bytes which give the line length: 
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&12 &00 &0A &00 


The line is thus &12 + 256 * &00 equal 18 bytes long and has a line number 
&OA + 256 * &00 equal 10. 


As you can see, by contrast with other BASIC Interpreters, constants in the 
program text are not stored as ASCII text but have already been converted 
into binary form. This has a quite definite advantage. The time-consuming 
conversion from ASCII into binary format only needs to be carried out once, 
i.e. when the line is entered, and not each time the line is executed. This 
speeds up program execution considerably. 


The CPC also has a whole range of numeric constants identified by 
corresponding tokens. Constants composed of single digits, i.e. numbers 0 to 
9, are coded by tokens &0E to &17 and thus only take up one byte in the 
program text. We have already encountered token &19 for single-byte 
values. There are three different tokens for two-byte integer values 
depending on whether the constant has been entered in decimal, binary or 
hexadecimal form. Filing with Lo and Hi bytes is the same in all three cases. 


&1A Two-byte value, decimal 
&1B Two-byte value, binary 
&1C Two-byte value, hexadecimal 


If the number is not an integer, or if the amount is greater than 32767, it is 
filed as a floating point value, identified by token &1F. Then come 5 bytes, 
representing the floating point value. Floating point numbers are to be 
discussed elsewhere. 


Line numbers are given a special treatment in this connection as, for 
example, when they follow commands such as GOTO, GOSUB or RUN. 
They are also stored as 16-bit binary numbers but are identified by token 
&1E. 


When a program is run and encounters a GOTO command, for example, it 
reads the line number and has to search the entire program for this line. This 
can take quite some time, particularly in the case of longer programs. Often, 
GOTO and GOSUB commands are used in program loops and run hundreds 
or thousands of times. The search times may then take up a large proportion 
of program execution time. The BASIC interpreter of the CPC only 
conducts this line search once. Once it has found a line, it replaces the line 
number after the GOTO command by the address of the line that it has 
found. To distinguish the address from a line number, the Interpreter alters 
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token &1E to &1D, i.e. the token for the line address. If the GOTO 
command is then executed again, the Interpreter directly obtains the address 
to which the program can branch, which saves considerable time. 


However, this method causes problems in the case of commands that require 
line numbers as such. If the LIST command has to output a line, the number 
indicates the line number to output, and not its address. However, this 
problem is easily overcome. If the line address is known, the line number can 
simply be obtained from it since, as we have already seen, the line number is 
stored with the line. If lines are deleted or added, line addresses must be 
replaced by the line numbers as the addresses then change. However, this 
only affects the entering and outputting of program lines and the drawback is 
far outweighed by considerably faster program execution. 


Program Execution by the BASIC Interpreter: 


The following is a simplified description of the way in which a statement is 
executed by the BASIC Interpreter. As already explained, each program line 
starts with the program length and the line number. Then comes the BASIC 
command itself. The Interpreter checks to see if it is a command token 
identified by a value of between &80 and &E1. If so, it uses this token as a 
pointer to a table that contains the addresses of all the BASIC commands. The 
BASIC command is executed as a sub-routine. This is followed by a return to 
the so-called Interpreter loop. If, on the other hand, the statement did not 
start with a command token, a branch to the LET command takes place. 


Probably the most important part of the BASIC Interpreter is the one 
devoted to the calculation of expressions. The CPC differentiates between 
three types of expression: integer, floating point and string. If, for example, 
a value is assigned to a variable, or if a parameter has to be calculated for a 
command, a routine is called to calculate the expression and provide the 
value and type of the expression. The variable type can assume three values: 


2 Integer 
3 String 
5 Floating point 


This type number, at the same time, represents the length of the variables. In 
the case of a string, this is the so-called Descriptor which contains the length 
and the address (see also the chapter on Variable Pointers). Now, if the type 
of an expression and the type of a variable to which this expression is to be 
assigned do not coincide, an attempt is made to change the type. However, 
this is only possible with the numeric types: integer and floating point. Of 
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course, conversions of this type take up computing time. Consequently, 
integer variables should always be used whenever possible. Experience 
shows that it is often possible to use integer variables 9 times out of 10. Not 
only does this make a type conversion unnecessary, but integer arithmetic is 
also considerably faster than floating point arithmetic. This is particularly 
applicable to control variables in FOR-NEXT loops and other counters. 


Any attempt to assign a string expression to a numeric variable, or vice 
versa, on the other hand, will result in a ‘Type Mismatch’ error message. 
Conversion from string to numeric and vice versa is only explicitly possible 
with the VAL and STR$ functions. 
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3.2 The BASIC Stack 


A stack or push-down store is used to store data on the 'Last in - first out’ 
principle. To do this, the processor uses the memory range as from &C000. 
Before each entry, the stack pointer is decremented. If data is taken from the 
stack, the pointer is then incremented. The processor stack is used, for 
example, to store return addresses for subroutine calls, and enables 
subroutines to be nested. 


In order to file the parameters of GOSUB calls, FOR-NEXT and 
WHILE-WEND loops, the BASIC interpreter also requires a stack to enable 
these program structures to be nested. The processor stack is not used for 
this purpose; there is a special BASIC stack with a capacity of 512 bytes, 
starting at address & AE8B. By contrast with the processor stack, this stack 
grows as entries increase to reach higher addresses up to the maximum of 
&BO8A. Memory location &BO8B/&BO8C serves as the stack pointer. 


Let us first look at the parameters that are placed on the stack in the case of a 
GOSUB command. 


&00/&01 GOSUB class identifier 


Lo Address of statement after 
Hi the GOSUB command 


Lo Line address of the 
Hi GOSUB command 


&06 Size of stack entry 


First of all, then, a byte which defines the type of GOSUB command is 
stored. With the usual type of GOSUB command, this is a zero byte. 
However, if a subroutine resulting from an AFTER or an EVERY command 
is called, a ‘one’ is placed on the stack to make the distinction. Then come the 
address of the next command after the GOSUB command and the address of 
the line at which the GOSUB command is located. To enable the stack entry 
to be re-identified when the RETURN command occurs, another byte is 
placed on the stack to indicate the length of the stack entry, thus implicitly 
identifying a GOSUB data item. 


The data of a WHILE-WEND loop is filed in a similar way. 
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Lo Line address of the 
Hi WHILE command 


Lo Address of the 
Hi WEND command 


Lo Address of the 
Hi WHILE condition 


&07 Size of stack entry. 


The entry thus contains 3 addresses and an identifying byte of 7, representing 
the number of stack entries. 


Matters are somewhat more complicated in the case of the FOR-NEXT loop. 
Here, there is a difference, depending on whether the control variable is of 
the integer or real type. In the first case, not only is the execution time 
shorter, but the stack requirement is less. Let us look first at the composition 
of an integer loop. 


Lo Address of the 
Hi control variables 


Lo Final value of the 
Hi control variables 


Lo STEP value 
Hi 


Sgn _ Sign of the STEP value 


Lo Address of the 
Hi FOR statement 


Lo Line address of the 
Hi FOR statement 


Lo Address of the 
Hi NEXT statement 


Lo Line address 
Hi of the NEXT statement 
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&10 = Size of the stack entry 


The size of the stack entry for a FOR-NEXT loop with integer variables is 
thus 16 bytes. If the loop is run with real variables, 22 bytes are placed on the 
stack. 


Lo Address of 
Hi _ control variables 


5 bytes floating Final value of 
point value control variables 


5 bytes floating STEP value 
point value 


Sgn Sign of the STEP value 


Lo Address of the 
Hi FOR statement 


Lo Line address of the 
Hi FOR statement 


Lo Address of the 
Hi NEXT statement 


Lo Line address of the 
Hi NEXT statement 


&16 Size of the stack entry 
Apart from filing loop structures, the BASIC stack is also used to store 
interim expressions for numeric calculations (e.g. with nested bracket terms) 


as well as to establish a hierarchy in the case of arithmetic and logic 
operators. 
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3.3 BASIC and Machine Language 
3.3.1 The CALL Command 


The CALL command provides the connecting link between BASIC and 
machine language. It can be used to call a machine program from a BASIC 
program. The CALL command also has a 16-bit address to indicate the 
location of the machine program, e.g.: 


CALL &8000 


In this way, a machine program is called from address &8000, or 32768 in 
decimal notation. If the machine program is terminated with the RET 
command, control is returned to the Interpreter, which continues executing 
the BASIC program. 


With the CALL command, the operating system and the BASIC Interpreter 
are not directly accessible; the RAM is selected throughout the 64K address 
range. Of course, operating system routines can be called via the entries in 
the range starting from &BO00. These routines automatically provide the 
required ROM/RAM configuration. If, during a CALL command, you wish 
to access BASIC Interpreter or operating system routines that cannot be 
reached via vectors, you can use the RST 3 and RST 5 routines to make the 
change-over. 


The CALL command also allows the routine to be supplied with parameters 
from BASIC. Up to 32 parameters can be supplied after the address, 
separated by commas; these are then placed at the disposal of the machine 
routine. Like the address itself, these parameters must give a 16-bit value. 
They are placed on the stack by BASIC. The BASIC Interpreter supplies the 
base address of this parameter block in the IX register. The accumulator also 
contains the number of parameters that have been supplied. The last 
parameter is thus at address IX, the second-to-last at address IX+2, and the 
first parameter at address IX+2*(A-1). 


All register contents can be altered during the CALL command. (See chapter 
on Firmware for the use of the second register). The stack pointer can also 
be altered as long as steps are taken to make sure that the correct return 
address is fetched from the stack when the program is ended with RET. 


Use of the CALL command gives your imagination full play. For example, 


you can provide extended graphic functions, such as drawing circles, filling 
in areas, etc. 
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No provision is made for transferring parameters back from the machine 
routine to BASIC, but there is a round-about way of doing this. For example, 
if the result of a machine program is to be assigned to a variable, its address 
can be supplied to the CALL command. This is done using 'pillion 
passengers’. 


CALL &AB00,@A 


The machine program is thus given the address of the variable A and the 
value of the variable can be changed directly. This solution is described in 
greater detail in the chapter on Variable Pointers. 


3.3.2 BASIC Extension using RSX 


The operating system and BASIC used by the CPC allow you to incorporate 
your own commands into the BASIC; this is known as RSX, which is an 
abbreviation for 'Resident System eXtension’. These extensions can be called 
by name using BASIC. They enable parameters to be supplied as already 
described in connection with the CALL command. If, for example, we wish 
to write a graphic extension to draw a square for us on the screen, the call 
may look like this: 


10 I"SQUARE,100,100,50 


This means a square has to be drawn having the coordinates 100,100 for its 
upper left-hand corner and a 50-dot side. 


As you can see, a command extension is characterised by a prefixed vertical 
stroke. 


A command extension of this type can be placed in an expansion ROM, as 
when you have an associated disk drive, or in the RAM. We are thus in a 
position to write our own extensions. So that the operating system knows 
where to look for an extension of this kind, the extension must first of all be 
‘incorporated’. This is done by using an operating system routine: KL LOG 
EXT. The following example shows how the above-mentioned square - 
drawing command is given and how the extension is incorporated. 
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;RSX-COMMAND EXTENSIONS 
; 15/6/85 

BCD1 LOGEXT EQU &BCD1 _ ;Extension Log 

BBC6 ASKCURR EQU &BBC6 ;Graphics-Get Cursor 
BBCO MOVABS EQU &BBCO _— ;Graphics-Set Cursor 

BBF9 DRAWRE EQU &BDC7 _ ;Draw Relative Line 

BDC7 CHGSGN EQU &BDC7 _ ;Change Sign 

8000 ORG &8000 

8000 010980 LD BC,RSX ;Address of RSX-Extensions 
8003 211680 LD HL,KERNAL 34 Byte RAM for Kernal 
8006 C3DIBC JP LOGEXT ;Log Extension 

8009 OE80 RSX DEFW TABLE __ ;Address of the Commands 
800B C31A80 JP QUADRAT 

800E 51554144 TABLE DEFM "QUADRA" 

8014 D4 DEFB "T"+&80 

8015 00 DEFB 0 ;End of the Table 

8016 KERNAL DEFS4_ ; Store for Kernal 

801A  FEO3 QUADRA CP 3 ;three parameters? 

801C CO RET NZ 

801D CDC6BB CALL ASKCURS ;Get Graphic Cursor 

8020 D5 PUSH DE ;Save X-Coordinate 

8021 E5 PUSH HL ;Save Y-Coordinate 

8022 DDS5605 LD D,(IX+5) 

8025 DDSE04 LD E,(1X+4) ;X-Coordinate 

8028 DD6603 LD H,(IX+3) 

802B DD6E02- LD L,(IX+2) ;Y-Coordinate 

802E CDCOBB CALL MOVABS ;Graphic Cursor to X-Y 
8031 DDS5601 LD D,(X+1) 

8034 DDSEOO LD E,(IxX) ;Distance from the X-Offset 
8037 DS PUSH DE ;Save 

8038 210000 LD HL,O >Y-Offset 

803B CDF9BB CALL DRAWREL ;Draw Hoizontal Line 

803E_ El POP HL 

803F E5 PUSH HL 

8040 CDC7BD CALL CHGSGN ;Y-Offset negative 
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8043 ES PUSH HL 
8044 110000 LD DE,O 
8047. CDF9BB CALL DRAWREL ;Draw vertical line 


804A Di POP DE snegative X-Offset 
804B 210000 LD HL,O ;Y-Offset null 

804E CDF9BB CALL DRAWREL ;Draw horizontal line 
8051 El POP HL 


8052 110000 LD DE,0 
8055 CDF9BB CALL DRAWREL ;Draw Vertical line 


8058 =o El POP HL 
8059 Di POP DE 
805A C3COBB JP MOVABS ;Restore coordinates 


Once the program has been loaded (as a binary file from diskette) or 
generated by means of a DATA loader and placed in the memory, it must be 
initialised. This is done by calling CALL &8000. The new command is now 
available. Two tables are used for incorporation. The first, named RSX in 
our example, first receives the address of the second table, named TABLE 
here, and then branch instructions to the extension itself. The second table 
contains the names that can be used to call the new commands. Here, both 
capitals and dots are allowed. The last character in a command word is 
identified by set bit 7. It can be followed by further command words. The 
end of the table is identified by a zero byte. Each table must, of course, 
contain the same number of entries; the first table must contain the jump 
address corresponding to each command word. We have to provide the 
operating system with 4 bytes under the KERNEL label; these are used to 
manage the extension and must be located between addresses &4000 and 
&BFFF. 


The variable pointer function is used in the CALL command which, as we 
know, can only supply 16-bit values. So, if you want to work with floating 
point values, you can use '@' to supply the address of a floating point 
number, to which you can then refer. Using this method, you can, of course, 
alter the value of the floating point variable directly. 


Things are even more interesting in the case of string variables. Here too, we 
can use the variable pointer to supply us with the address of the variable. 
However, we get, not the address of the string itself, but the address of the 
so-called string descriptor. This string descriptor is three bytes long. The 
first byte contains the length of the string, i.e. a value of between zero and 
255. The next two bytes contain the address of the string. 


100 INPUT a$ 
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110 ad=@a$ 

120 I=PEEK (ad) 

130 sa=PEEK(ad+1)+256* PEEK (ad+2) 

140 FOR i=sa TO sa+I-1:PRINT CHR$(PEEK(1));:NEXT 


The program gets the length and address of the string, then reads and outputs 
it. 


Here too, the variable pointer can be used to supply a string to the CALL 
command. 


Strings can also be used in quite a different way in association with the CALL 
command. To do this, we simply place a machine program name in a string 
and we can then call it using the CALL command and the variable pointer. 
The machine program has to be relocatable for this purpose (no internal 
unconditional jumps) and must not be longer than 255 bytes. This is usually 
the case with smaller utilities. If you want to use this method, you have to 
proceed as follows: 


First of all, the machine program name is placed in the string variable. This 


is usually done with READ and DATA. You then execute the program and 
calculate the start address of the string (and of the machine program). 
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3.4 The BASIC ROM 


3.4.1 Floating Point Arithmetic 


All arithmetic functions used by the BASIC Interpreter are to be found in the 
operating system ROM. They are called via the branch table from &BDSE to 
&BDBB. If you wish to change these arithmetic routines, add a jump to your 
own routine at the corresponding point. 


Below is an example of how to use the floating point routines of the BASIC 
Interpreter to calculate the square root of a number. The CPC BASIC 
Interpreter provide us with this function, but the object is to show that it can 
be improved by using powerful algorithms. 


The built-in SQR function uses the same algorithm as for exponent 
calculations. 


SQR(X) = EXP (LOG(X)*0.5) 


An exponential and logarithm function therefore have to be calculated each 
time and this involves time-consuming polynomial calculations. However, 
the square root can be calculated by simple iteration. 


X(N+1) = (X(N) + A/ X(N)) /2 


Where A is the number from which the root is to be extracted, X(N) is the 
old approximated value and X(N+1) is the new one. The number A itself can 
be taken as the starting value, but a better approximated value is obtained if 
we halve the exponent of two of the floating point number. The result then 
ceases to change after four iterations in terms of computing accuracy. Make 
sure not to divide by 2 using the time-consuming floating point division 
operation; simply decrement the exponent of two by one. This saves a 
considerable amount of time. While the SQR routine of the Interpreter takes 
27 milliseconds, our routine can perform the same task in barely 8 
milliseconds, so it is more than three times faster. 
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;FAST SQR-ROUTINE 


; 10/6/85 


A000 


BD91 
BD85 
BD79 


A000 
A003 
A004 
A005 
A008 
AO0A 
A00B 


A00C 
A00D 
A010 
A013 
A015 


A016 
A017 
A019 
AOIC 
AOIE 
AOIF 
A020 
A022 
A025 
A027 
A028 
A029 
A02C 
A02F 
A031 
A032 
A033 
A036 
A037 
A03A 


SGN 
DIV 


ORG & A000 
EQU &BD91 
EQU &BD85 


ADD EQU &BD79 


CD91BD 
3F 

C8 
F20CA0 
3E01 

B7 

C9 


ES 
1153A0 
010500 
EDBO 
El 


E5 
DDE1 
DD7E04 
D681 

3F 

1F 

C601 
DD7704 


“0604 


CS 

ES 
1158A0 
010500 
EDBO 
El 

ES 
1153A0 
EB 
010500 
EDBO 


NEWSQR CALL SGN _;Examine Before drawing 
CCF 

RET Z ;Null, already finished 

JP P,GOON 

LD A,l ; IMPROPER ARGUMENT’ 
OR A 

RET 


GOON PUSH HL 

LD DE,STORE1 

LD BC,5 

LDIR £22299 


eet © | ee 


PUSH HL 

POP IX 

LD A,(IX+4) ;Exponent 

SUB &81 ;Normalize 
CCF 

RRA ;Halve Exponent 
ADD A,1 

LD (IX+4),A . 3Load start value 
LD B4 ;4 Iterations 

ITER PUSH BC 

PUSH HL 

LD DE,STORE2 

LD BC,5 

LDIR ;Mark approximation 
POP HL 

PUSH HL 

LD DE,STOREI1 

EX DE,HL 

LD BC,5 

LDIR ;Get Radicant 
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A03C_ EI POP HL 

A03D 1158A0 LD DE,STORE2 
A040 CD85BD CALL DIV 

A043 =1158A0 LD DE,STORE2 
A046 CD79BD CALL ADD 


A049_—sOES PUSH HL 

A04A DDEI POP IX 

A04C DD3504 DEC (IX+4) ;Number/2 
AO4F Cl POP BC 

A050 = 10D5 DJNZ ITER 

A052 C9 RET 


A053. STORE1 DEFS5 
A058 STORE2 DEFS5 


But how do we get the Interpreter to use the new routine? Vector &BD9D is 
used for the SQR function. A jump to our routine has to be entered at this 
address. 


JP &A000 


If the routine is called using BASIC, the HL register must show the floating 
point value. After the routine has been executed, the HL register must give 
the result. Usually, the value in this register will not have changed. The flags 
indicate the error status of the function: 


If you own a CPC 6128, you will have to increment the addresses of the 
SGN, DIV and ADD routines by three in each case; in the same way, the 
jump to &A000 will have to be located at address &BDAO. 


Error status of the functions 


C=1 Proper execution 

C=0 & Z=1 ‘Division by zero' 
=0 & N=1 ‘Overflow' 

C=0 & Z=0 ‘Improper argument’ 


The following pages contain the listing for floating point arithmetic; each 
routine also contains the address of the branch table via which it is accessed 
by the BASIC Interpreter. The integer arithmetic is located in the BASIC 
ROM from addresses DD2F to DE19. and is used by the Interpreter when 
possible. As only 2-byte values are used in integer calculations, this 
arithmetic is considerably quicker than with floating point numbers. Take 
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advantage of this in your programs, using only integer variables whenever 
possible. This is also particularly relevant to FOR-NEXT loops (see also 
Chapter 3.2). 


275 


First Publishing Anatomy of the CPC's 





kkKKKK BDOT PI 


2F73 

2F78 PI 

kkk*k*k*k BDSE Copy variable 
2F91 


xxk*k*k*K*k BD64 4-byte value to floating point 
2FC8 

xxx*k** BDBS 4-byte value 256 times to integer 
2FD1 

kk*k*k*K*K BD67 Floating point to integer 


2FD9 

xxxkk*kX = BD6A Floating point to integer 
3001 

zkKKKK BDED FIX 

3014 

KKK KKK BD70 INT 

3055 

kkkKKK = BD73 

305F 

x*k*K* BD76 Multiply number by 10°A 
30C6 

xkk*kkk BDB8 RND INIT 

3136 

***x**k*k BDBB SET RANDOM SEED 
3143 

kkkkK*K*K BDT7C RND 

3159 

xx*kk**k BD88 get last RND value 
3188 

*eekkk*K =BDA3 LOG10 

31B1 

**ee*k*K —BDAQ LOG 

31B6 

zkkKKKK BDAG EXP 

322 

xkekxkxkk*K ©6©BDOA) 6SOR 

32AC 

xxkkkk* BDOID Exponentiation 
32AF 

x*kk*kkK*K BD94 DEG/RAD 

3345 

KKK KKK BDAA Cos 

3349 
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KKKKKK 


3353 


KaKKKKK 


33C8 


KaKKKK 


33D8 


KkKKKKK 


349E 


wKkKKKKK 


34A2 


KkKKKKK 


3577 


KKKKKK 


3604 


KKKKKK 


36DF 


KKKKKK 


S727 


KaAKKKK 


37SL 


BDA7 


BDAF 


BDB2 


BD7F 


BD79 


BD82 


BD85 


BD8B 


BD91 


BD8E 


SIN 

TAN 

ATN 
Subtraction 
Addition 
Multiplication 
Division 
Comparison 

SGN 


Sign change 
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xxkKKK CPC 664 & 6128 BASIC 1.1 
co00o First foreground ROM 
cool Mark 1 


c002 Version 1 
C003 Modification 0 
C004 Address of name 


kkkkk*k BASIC initialisation 
C006 Stack as from C000 
C009 KL ROM WALK 





cooc Configure memory 

COOF Too little memory, then reset 
c013 Suppress, reset flag for blanks 
C016 Pointer to ' BASIC 1.1' 

c019 Output text 

CO1C Current line address to zero 
CO1F Delete error number 

C022 RND-Init 

C025 Reset AUTO mode 

C028 NEW command 

C02B 240 

CO2E SYMBOL AFTER 240 

C031 To READY mode 

C033 ' BASIC 1.1',LF,LF,0 

c040 "BASI', 'C'+80H,0 

x*kk*k*k*K BASIC command EDIT 

C046 Get line number to DE 

CO4A Initialise stack 

C04D Search BASIC line DE 

C050 List BASIC line in buffer 


C053 Get input line 
xx*k*k*k* READY mode 


C058 Initialise stack 

CO5B Various initialisations 
CO5E Get line address 

C061 SOUND HOLD 

C064 Reset break event 

C067 Initialise screen 

CO6A Protected program? 

COCE Yes, reset program and variables 
co71 ERROR number 

C074 "Syntax error'? 

C076 No 

c078 ERROR number to zero 
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C0O7B 
CO7F 
c081 
C084 
C087 
CO8A 
CO8E 
c090 
C093 
C095 
CO9D 
COAF 
COB2 
COB4 
COB7 
COD4 
COD7 


KaKKKKK 


CODF 
KKKEKKK 
COE1 
COE6 
KKKKKK 
COEA 
COEF 
COF1 
COF5 
COF8 
COFB 
COFE 
C102 
C106 
C10D 
C115 
C118 
C11E 
C121 
C122 
KaKKKKK 
C128 
C129 
C12C 


KaKKKKK 


Get line number of ERROR line 
To EDIT command 

Output pointer 

to 'Ready' 

Current address to zero 

AUTO flag set? 

No 

Preset next line number 

To READY mode 

Ignore blank, TAB and LF 
Ignore blank ,TAB and LF 

Get input line 

'ESC' depressed, then repeat 
Output LF 

Ignore blank, TAB and LF 

To interpreter loop 
'Ready', LF, 0 

Reset AUTO mode 


Set AUTO mode 

Line number 

Set flag for AUTO 

BASIC command AUTO 

10, default 

' ' 

Get line number to DE 

10, default 

Comma following? 

Yes, get line number to DE 
End of line, otherwise 'Syntax error' 
Save AUTO increment 

Save flag for AUTO mode 
Line number 

Reset AUTO mode 

Edit lines 

Line number 

Plus increment 

Set AUTO mode 

BASIC command NEW 


Reset program and variables 


To READY mode 
BASIC command CLEAR 
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C12F 
C13A 


KKKKKK 


C13F 
KKK KKK 
C145 
C149 
C152 
C154 
C156 
C159 
C15F 
C163 
C166 
C16C 
C16F 
C172 
C175 
C17A 
C17D 
C180 
C183 
KaAKKKK 
C189 
C18C 
C18F 
C192 
C195 
C198 
C19B 
C19E 
C1AB 
C1AD 
C1Bl 
C1B7 
C1Cl 
C1c4 
C1C7 
C1CA 
C1CD 
C1D2 
C1D7 


wKkKKKKK 


‘INPUT' 

Various initialisations 
CLEAR INPUT 

Ignore blanks 

Reset program and variables 
Start of free RAM 

HIMEM 

Clear accumulator 

Clear start of free RAM up to HIMEM 
Reset flag for protected program 
Reset variable pointer 
Interrupt disk I/O 

Set RAD mode 

Initialise descriptor stack 
Stream reset 

TROFF 

Reset AUTO mode 

Various initialisations, see below 
Clear strings 

Reset variable pointer 

All variables to 'Real' type 
Ignore blank, TAB and LF 
Various initialisations 
Initialise tabulator stops 
Reset program pointer 

Reset ON-ERROR 

Reset program pointer after interrupt 
SOUND and event reset 
Initialise BASIC stack 

Reset flag for FN 

RESTORE 

< 8? 

TXT STR SELECT 

Current stream number 

Input channel 

Current stream number 
Printer? 

Input channel 

Floppy disk? 

Test for stream number 

Test for stream number 

Test for stream number 

Get stream number 
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C1E8 
C1ED 
C1F5 
C1F7 
KKK KK 
C1FF 
C201 
C204 
C208 
C20B 
KKK KKK 
C210 
C213 
C214 
C218 
C219 
C21C 
C21F 
C220 
KKK KK 
C223 
C225 
kok KK 
C227 
C22A 
C230 
C234 
C237 
KR KKK 
C23C 
C23F 
C242 
C246 
KR KK 
C24B 
C24F 
KR KK 
C254 
C268 
C25B 
C260 


KaKKKKK 


C265 


Test for stream number 
‘Improper argument' 

' 1 

Jump to (BC), execute function 
Test for stream number 

ue 3 

0 as default 

Get stream number 

Comma following? 

No, then end of statement 
Get stream number 

Test for following character 
wae 

10, maximum valuetl 

Maximum value to B 

Get 8-bit value 

Compare with maximum value 
Less OK 

‘Improper argument' 

Get 8-bit value less than 2 
Maximum value 2 

Get argument and test 

BASIC command PEN 

Get stream number 

TXT SET PEN 

Comma following? 

Get 8-bit value less than 2 
TXT SET BACK 

BASIC command PAPER 

Get stream number 

TXT SET PAPER 

Get argument < 16 

Jump to (BC), execute function 
BASIC command BORDER 

Get 2 arguments less than 32 
SCR SET BORDER 

BASIC command INK 

Get argument less than 16 
Test: for"; 

Get 2 arguments less than 32 
SCR SET INK 

Get 2 arguments less than 32 
Get argument < 32 
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C268 
C269 
C26D 
C26F 
C272 
RK KKK 
C274 
C276 
KK KK 
C278 
C27A 
C27E 
ARK KR 
C283 
C287 
C28C 
C291 
C294 
Kok RAK 
C29B 
C29E 
C2A1 
KKK RRR 
C2A4 
C2A8 
kok RK 
C2AD 
C2B0 
C2B4 
C2B7 


Kak KKK 
KKK KKK 


C2CA 
C2CD 
C2DA 
Kk RK 
C302 
C305 
C30C 
kK KR KKK 
C311 
C315 
C318 


to B 

Comma following? 

32 

Get argument less than 32 
TOzC 

Get argument < 16 

16 

Get argument less than 16 
BASIC command MODE 

3 

Get argument less than 3 
SCR SET MODE 

BASIC command CLS 

Get stream number 

TXT CLEAR WINDOW 

Get stream number 
‘Improper argument' 

Test for ')' 

BASIC function COPYCHR$ 
Get stream number, close brackets 
TXT RD CHAR 

Adopt character as string 
BASIC function VPOS 

Get stream number 

Get cursor line 

BASIC function POS 

Get stream number 

Test for ')' 

Get position 

Convert accumulator contents to integer 
Get current PRINT position 
Get cursor line 

TXT GET CURSOR 

TXT VALIDATE 

TXT GET WINDOW 

BASIC command LOCATE 

Get stream number 

Get two 8-bit values not equal to zero 
TXT SET CURSOR 

BASIC command WINDOW 
"SWAP ' 

Get stream number 

Get two 8-bit values not equal to zero 
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C31C 
C31F 
C326 
KR KKK 
C32B 
C32E 
C332 
C335 
C337 
C33C 
KR KKK 
C341 
C343 


aKKKKKK 


C346 
KKK KK 
C34D 
€351 
KK KK 
C354 
C357 
C358 
C35C 
C360 
KR KR 
C363 
C366 
C368 
C36C 
C36F 
C372 
C375 
C376 
C37A 
C37D 
KR KKK 
C380 
C381 
C384 
C387 
C390 
C391 
C392 


Test for ',' 

Get two 8-bit values not equal to zero 
TXT WIN ENABLE 
WINDOW SWAP 

Ignore blanks 

Get argument < 8 
Comma following? 
Default zero 

Yes, get argument < 8 
TXT SWAP STREAMS 

Get argument < 8 

8, maximum value 

Get argument 

BASIC command TAG 

Get stream number 
BASIC command TAGOFF 
Get stream number 

TXT SET GRAPHIC 

Get two 8-bit values not equal to zero 
Get first value 

To D 

Test. for-:";.' 

Get 8-bit value not equal to zero 
Value to E 

BASIC command CURSOR 
Get stream number 
Zero? 

Get 8-bit value < 2 
TXT CUR OFF 

TXT CUR ON 

Comma following? 

No 

Get 8-bit value <2 
TXT CUR DISABLE 

TXT CUR ENABLE 

Output string 

String address 

132 

WIDTH to 132 

Set POS to one 

Get character 
Increment pointer 
Last character? 
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C393 
C396 
Kk RK 
C39C 
C39E 
KKK RK 
C3A5 
C3AB 
C3AD 
C3AF 
C3B2 
C3B5 
C3B8 


KaKKKKK 


C3BE 
KaKKKKK 
C3C4 
C3C9 
C3CC 
C3D0 
C3D4 
C3D9 
C3DD 
C3E0 
C3E5 
C3EA 
C3EC 
C3F1 
KkKKKKK 
C3F8 
C3FD 
C40B 
C40F 
C415 
C41A 
C434 
C439 
C499 
C44C 
C44D 
C44F 
C453 
C45A 


No, output 

next character 
Output LF 

Output 

LF 

Output character 
Output character 

LF 

No 

Output device 
Printer? 

Disk? 

Output character 
Output character 
Output character 
Select output channel 
Output channel 
Output to printer 

To disk 

To screen 

TXT SET GRAPHIC 

TXT SET BACK 

TXT VDU ENABLE 

TXT VALIDATE 

CR 

LF 

TXT OUTPUT 

TXT VALIDATE 

Output CR & LF to printer 
CR 

LF 

MC PRINT CHARACTER 
Test for interrupt with 'ESC' 
CR 

' ' 

CR 

LF 

DISK OUT CHAR 
Error-free 

Output error message 
Set DERR 

CAS TEST EOF 

Adopt sign as integer 
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C45F 
C462 
C468 
C46B 


KKKKKK 


C472 
KKK KKK 
C475 
C479 
C47C 
C47F 
C485 
C488 
C48E 
KKK KK 
C495 
C498 
C49A 
C49C 
C49E 
C4Al 
KR KR KK 
C4A7 
C4AF 
C4B2 
C4B5 
C4BB 
C4C3 
c4c5 
C4CA 
C4DC 
Kk RK 
C4E1 
C4E6 
C4E9 
C4EB 
C4F0 
C4F3 
C4F8 
C4FE 
C504 
C509 
C510 


CAS IN CHAR 

Error-free? 

Output error message 

‘Floppy disk error' 

Set POS to one 

KM READ CHAR 

Test for abort with 'ESC' 

KM READ CHAR 

'Break' 

Wait for second key depression 
'ESC', then abort 

Address of break event routine 
BASIC ROME select 

KM ARM BREAK 

Break event routine 

KM READ CHAR 

No key depressed? 

Break by 'ESC' 

Ignore depression of keys before 'ESC' 
Wait for second 'ESC'! 

Test for ON BREAK GOSUB 

Wait for key depression after 'ESC' 
SOUND HOLD 

TXT CUR ON 

KM WAIT CHAR 

‘ESC' 

TXT CUR OFF 

' ' 

KM CHAR RETURN 

SOUND CONTINUE 

KM DISARM BREAK 

BASIC command ORIGIN 

Get 2 arguments 

Comma following? 


No 
Get 2 arguments 
Test for ',' 


Get 2 arguments 
GRA WIN HEIGHT 
GRA WIN WIDTH 

GRA SET ORIGIN 
End of statement? 
GRA CLEAR WINDOW 
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KkKKKKK 


C515 
CS51A 
C51D 
C520 
C523 
C526 
C528 
C52D 


KkKKKKK 


C532 


kKakKKKK 


C537 


KkKKKKK 


C53C 


KkKKKKK 


C541 


KkKKKKK 


C546 
KaKKKKK 
C54B 
C54F 
C552 
C555 
C557 
C55C 
C55F 
C563 
C567 
C56F 


KaKKKKK 


C574 
KKK KAR 
C579 
C57D 
C580 
C587 
C58A 
KKK KK 
C58F 
C593 
C596 
C59A 


BASIC command FILL 

Get argument < 16 
Garbage collection 
Calculate free storage space 
At least 29 bytes 
Comparison HL <> BC 
Otherwise 'Memory full' 
Output error message 
FILL 

BASIC command MOVE 

GRA MOVE ABSOLUTE 
BASIC command MOVER 
GRA MOVE RELATIVE 
BASIC command DRAW 

GRA LINE ABSOLUTE 
BASIC command DRAWR 
GRA LINE RELATIVE 
BASIC command PLOT 

GRA PLOT ABSOLUTE 
BASIC command PLOTR 
GRA PLOT ABSOLUTE 

Get 2 integer arguments 
Comma following? 

No 


' ' 
, 


Comma following? 

No 

Get 8-bit value < 4 

SCR ACCESS 

Jump to (BC) 

BASIC function TEST 

GRA TEST ABSOLUTE 

BASIC function TESTR 

GRA TEST RELATIVE 

Get 2 arguments 

Test for ')' 

Jump to (BC) 

Convert accumulator contents to integer 
Get 2 integer arguments 

Get 16-bit value -32768 to 32767 
Test for ',' 

Get 16-bit value -32768 to 32767 
Result to BC 
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KKKKKK 


C59D 
CSA1 
C5A4 
C5A5 
CSAA 
CSAE 
kkk KR 
C5B4 
C5B7 
CSBA 
KKK KKK 
C5BD 
C5C0 
kKkKKKKK 
C5C3 
CS5C7 
C5CD 
c5D1 
KkKRKKK 
C5D7 
CS5DD 
C5E0 
C5E6 
C5E9 
C5ED 
CS5F0 
CS5SF3 
CS5FC 
CSFF 
C603 
C607 
C610 
C616 
C61lA 
C61C 
Cé61lF 
C620 
C624 
C628 
C62B 
C62F 
C633 


BASIC command GRAPHICS 
"PAPER' 

Test for following character 
'PEN' 

' ; ' 

Comma following? 

Get 8-bit value < 2 

GRAPHICS PAPER 

Ignore blanks 

Get argument < 16 

GRA SET PAPER 

GRAPHICS PEN 

Get argument < 16 

GRA SET PEN 

BASIC command MASK 

' ' 

Get 8-bit argument 

Comma following? 

Get 8-bit value < 2 

BASIC command FOR 

Read variable 

Search for corresponding NEXT 
Save address 

Search for open FOR-NEXT loop 
Found, set BASIC stack pointer 
End of statement? 

Default zero 

No, get variable 

Comparison HL <> DE 
‘Unexpected NEXT' 

Current line address to HL 
Set current line address 

22 bytes, type 5 'real' 

16 bytes, type 2 ‘integer' 
'Type mismatch' 

Output error message 

Number of bytes to A 

Reserve place on BASIC stack 
Variable address on BASIC stack 
Test for '=' 

Get expression 

Compare variable type 

Buffer store for FOR variable 
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C636 
C63A 
Cé63D 
C63E 
C643 
C646 
C64C 
C64F 
C653 
C654 
C656 
C658 
C65B 
C65F 
C663 
C666 
C66A 
C66E 
C673 
C677 
Cé7C 
C681 
C689 
C68C 
C68E 
C691 
C695 
C699 
C69F 
C6A1 
C6A4 
KKK K KK 
C6A5 
C6A7 
C6AB 
CéBl 
Cé6B6 
C6BE 
C6C2 
Cé6C5 
C6CA 
CéCD 
C6CF 


Copy variable to HL 

Test for following character 

"TO! 

Get expression 

Compare variable type 

Final value on BASIC stack 

One as default STEP value 

Adopt integer HL 

Next character 

“STEP? 

No 

Ignore blanks 

Get expression 

Compare variable type 

Copy variable to (HL) 

Get sign 

Sign of STEP value on BASIC stack 
End of statement, otherwise 'Syntax error' 
Address of FOR command on BASIC stack 
Current line address to HL 

Line address of FOR on BASIC stack 
Address of NEXT command on BASIC stack 
Line address of NEXT command on BASIC stack 
#10 or #16 for integer/real on stack 
Pointer to buffer store 

Retrieve FOR variable 

Flag for first run 

Set current line address 

To NEXT command 

Output error message 

‘Unexpected NEXT' 

BASIC command NEXT 


Add flag for increment 

Search for open FOR-NEXT loop 
Set BASIC stack pointer 

Test for end of loop 

Program pointer to DE 

Line address to HL 

Set current line address 
BASIC stack pointer 

Plus 5 

Progam pointer to 'NEXT' 
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CéD2 
CéD6 
Cé6D9 
wkKkKKKK 
CéDC 
C6EB 
C6F8 
C70A 
C70C 
C713 
C717 
C71B 
C71F 
C129 
C730 
C734 
C73E 
C742 
C749 
C74C 
C74F 
C751 
C761 
kkk KKK 
C76A 
C76D 
C771 
C774 
C778 
C77C 
C77F 
C780 
C782 
C784 
C786 
KKKKKK 
C789 
C78D 
KKKKKK 
C78F 
C794 
C796 
C797 


Set BASIC stack pointer 

Comma following? 

Yes, next NEXT loop 

Search for open FOR-NEXT loop 
BASIC stack pointer 
'WHILE-WEND'? 

Comparison HL <> DE 

Integer? 

Yes 

Set variable type and address 
Flag for first run 

Yes, ignore addition 

Addition 

Copy variable to (HL) 
Arithmetic comparison 

10 

First run? 

Yes, ignore addition 

Get STEP value to HL 

Integer addition HL := HL + DE 
‘Overflow' 

Output error message 

Integer comparison 

BASIC command IF 

Get expression 

'GOTO' 

Test for following character 
'THEN' 

Search for end of line or ELSE branch 
End of statement? 

Yes 

Line number 

Yes, to GOTO command 

Line address? 

No, execute BASIC command 
BASIC command GOTO 

Get line address 

Adopt address as program pointer 
BASIC command GOSUB 

Get line address 

Identifier for normal 'GOSUB' 
Save address of subroutine 

6 bytes 
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C799 
C79F 
C7A0 
C7A3 
C7A8 
C7AB 
C7B1 
kK RK 
C7B4 
C7B7 
C7BA 
C7BD 
C7BE 
C7C1 
C7C4 
C7C8 
C7C9 
C7CB 
C7CC 
C7CF 
C7D6 
C7DB 
C7EO 
C7E6 
CTE9 
kkk kk 
C7EB 
C7EE 
C7FO 
C7F6 
CTF9 
C7FB 
C7FF 
C804 
C809 
C810 
C811 
C813 
C816 
C81B 
kk kk 
C81D 
C822 


Reserve place on the BASIC stack 
Address of statement to 'GOSUB' 
On BASIC stack 

Current line address to HL 
Line address on BASIC stack 
Identifier for 'GOSUB' 

Program pointer to subroutine 
BASIC command RETURN 

Search for 'GOSUB' on BASIC stack 
Reset BASIC stack pointer 
Identifying byte 

Address of statement to 'GOSUB' 
Get to DE 

Line address to HL 

Set current line number 
Identifying byte 

Less than one? 

Yes, normal 'GOSUB' 

One, then GOSUB to AFTER/EVERY 
To event routine 

Get identifier from BASIC stack 
Reset BASIC stack pointer 
"GOSUB' 

Output error message 
‘Unexpected RETURN' 

BASIC command WHILE 

Search for corresponding WEND 
Save address 

Line address for 'WHILE-WEND' 
Set BASIC stack pointer 

7 bytes 

Reserve place on BASIC stack 
Current line address to HL 
Line address on BASIC stack 
Address to 'WEND' on BASIC stack 
Address of WHILE condition 

On BASIC stack 

Identifier for 'WHILE' 

Set BASIC stack pointer 

Test WHILE condition 

BASIC command WEND 


‘Unexpected WEND' 


290 


First Publishing Anatomy of the CPC's 





C824 
C82C 
C82F 
C832 
C83B 
C848 
C84B 
C84F 
C850 
C853 
C858 
kKaKKKK 
C860 
C87B 
kkk KKK 
C885 
C88A 
C88F 
C894 
C897 
C899 
C89C 
C89F 
C8A2 
KKKKKK 
C8B5 
C8B9 
C8BC 
C8BE 
C8C2 
C8C8 
C8C9 
C8D4 
C8D9 
C8E0 
C8ED 
C8F2 
C8FC 
c901 
C906 
c909 
C915 
C918 


Output error message 

Set BASIC stack pointer 
Current line address to HL 
Line address for WHILE-WEND 
Set current line address 
Get expression 

Get sign 

Condition fulfilled? 

Line address for WHILE-WEND 
Set as current line address 
Release place on BASIC stack 


BASIC stack pointer 
Comparison HL <> DE 
BASIC command ON 


‘ERROR' 

Get 8-bit value 

'GOTO' 

Test for following character 
‘GOSUB' 


Ignore following blanks 
Decrement counter 

Get line number to DE 

Comma following? 

Event processing (AFTER/EVERY) 


KL NEXT SYNC 

No event pending? 

Save priority 

Reset bit 7 

Address of event block 
KL DO SYNC 

KL DONE SYNC 

Next event 

Enable interrupt by 'ESC' 
'Break' 

To interpreter loop 
ON-BREAK address 

Line number to HL 

Direct mode 

SOUND CONTINUE 

Test for following character 
‘GOSUB' 
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C919 
C91D 
C920 
KKK 
C929 
C92D 
C932 
C934 
C937 
C93A 
C949 
C9O5A 
C95E 
C968 
C96C 
C96F 
C976 
KOR RK 
C979 
C97TC 
C9OTF 
C984 
C986 
C98B 
C98E 
C98F 
C993 
C997 
KR RK 
C99A 
C99B 
KKK RK 
C9A0 
C9A1 
KOR RK 
C9A6 
C9A9 
C9AC 
C9AF 
C9B3 
C9BE6 
C9B7 
C9B9 


Get line address 
To.-BC 

10 

Event routine 


Get line number/direct mode 
Yes 

Identifying byte for AFTER/EVERY-GOSUB 
GOSUB command 

Address of current statement 
Address of current statement 
-8 

KL DONE SYNC 

-4 

KL DONE SYNC 

Enable break by 'Break' 

To interpreter loop 

BASIC command ON BREAK 


Ignore blanks 

‘CONT! 

'STOP' 

Default value zero for stop 
Test for following character 
"GOSUB' 

Get line address 

ON-BREAK address 

KM DISARM BREAK 

BASIC command DI 


KL EVENT DISABLE 
BASIC command EI 


KL EVENT ENABLE 

SOUND and event reset 

SOUND RESET 

Base address of event block 
4 timer 

KL DEL TICKER 

18 

Add 

Next timer 

KM DISARM BREAK 
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C9BC 
C9C2 
Cc9C5 
C9C8 
C9D4 
C9ODF 
C9E1 
C9E4 
KR RK 
C9OF8 
COFB 
COFF 
CAO5 
CA08 
CAOE 
KKK KK 
CALS 
CA18 
CA1D 
CA22 
Kk RR KK 
CA25 
CA28 
Kok KK 
CA2D 
CA30 
CA31 
CA34 
CA37 
CA3A 
CA3E 
CA42 
CA47 
CA4E 
Kk KKK 
CA53 
CA56 
CA59 
CAC5 
CASE 
CA62 


KkKKKKK 


CA65 


KL SYNC RESET 

Delete ON-BREAK address 

Enable interrupt by BREAK 
Address of sound queue 

Address of event block 

BASIC ROM select 

Address of event routine 

KL INIT EVENT 

BASIC command ON SQ 

Test for ')' 

Get 8-bit value 

Calculate address of sound queue 
Test for ')' 

"GOSUB' and get address 

SOUND ARM EVENT 

Calculate address of sound queue 
Bit 0 set? 

Bit 1 set? 

Bit 2 set? 

‘Improper argument' 

BASIC command AFTER 

Get 16-bit value 0 - 32767 
Recharge count to zero 

BASIC command EVERY 

Get 16-bit value 0 - 32767 

as count and 

recharge count 

Comma following? 

Default value zero 

Yes, get integer value with sign 
Get address of event block from timer# 
Add 6 bytes for ticker block 

Get 'GOSUB' and address 

KL ADD TICKER 

BASIC function REMAIN 

CINT 

Get address of event block 

KL DEL TICKER 

Found? 

No, zero 

Create integer in HL 

Calculate address of event block 
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CA66 
CA67 
CA6A 
CAC6 
CA70 
CA74 
CA77 
RRR 
CA79 
CATA 
CATF 
CA81 
CA87 
CA8A 
CA8F 
CA93 
CA94 
CA99 
CA9D 
CAA1 
CAA2 
CAA4 
CAA7 
CAAB 
CABO 
CAB3 
CABS 
CAB8 
CABA 
CABD 
CAC1 
CAC6 
CAC9 
Ak KR 
CACC 
CACE 
CAD2 
CAD4 
CAD5 
CADB 
CADF 
CAE1 
CAE3 


Hi byte equal to zero? 

No, ‘Improper argument' 
Greater than or equal to 4? 
Yes, ‘Improper argument' 

* 18 

Base address event table 

Plus offset 

Search for corresponding NEXT 


Current line address to HL 
Counter for nesting 

Error number for 'NEXT missing' 
Ignore blanks 

"NEXT! 

'FOR' 

Increment nesting level 
Continue search 

Current line address to HL 
Set current line address 
Decrement nesting level 
Corresponding NEXT found? 
Ignore blanks 

End of line? 

Search for variable 

Comma following? 

No 

Otherwise, next variable to NEXT 
Corresponding NEXT found 

Yes 

Current line address to HL 
Set current line address 
Continue search 

Ignore blanks 

Search for corresponding WEND 


Current line address to HL 
Increment 

Counter for nesting 

Error number for 'WEND missing' 
Ignore blanks 

‘WHILE' 

Increment nesting level 

‘WEND' 
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SS 


CAE7 
CAE9 
CAEC 
CAEF 
CAF3 
CAF 6 
CAF 9 
KKK RKK 
CAFC 
CAFF 
CBO1 
KR KK 
CB04 
CBO7 
CBOA 
RK KKK 
CBOD 
CBOE 
CB18 
CB1D 
CB25 
CB2D 
CB30 
CB32 


KkKKKK 


CB3A 
KR KKK 
CB3B 
CB3E 
CB41 
CB44 
ee 
CB48 
CB49 
CB4A 
KKK KKK 
CBC4 
CB4E 
KKK KKK 
CB50 
CB52 


KaKKKKK 


CB54 


Decrement nesting level 
Ignore blanks 

Ignore blanks 

Get input line 

Select stream 0 
Initialise stack pointer 
To interpreter loop 

Get input line 

Pointer to input buffer 
Delete buffer contents 
Get input line 

Edit line 

Pointer to input buffer 
Edit line 

Output LF 

Get input line from diskette 


Pointer to input buffer 
DISK IN CHAR 

CR 

LF 

Output error message 
'Line too long' 

LF 

Delete error number 


Set error number 

Diskette error 

Error number 

Current line address to HL 

As ERROR line 

Output error message 

Return address to HL 

Get character to CALL command 
As error number, output message 
Output ‘Syntax error' 

Error number for ‘Syntax error' 
Output error message 

Output ‘Improper argument' 
Error number for ‘Improper argument' 
Output error message 

BASIC command ERROR 

Get 8-bit value not equal to 0 
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CB58 
CB5B 
CB5E 
CB61 
CB67 
CB70 
CB79 
CB7D 
CB8B 
CB90 
CB93 
CB99 
CBA3 
CBAA 
CBAD 
CBBO 
CBBA 
CBBD 
CBC3 
CBC6 
CBCA 
CBDO 
CBD1 
CBD4 
CBD5 
CBD8 
CBDA 
CBDE 
CBE1 
CBE2 
CBE9 
CBEC 
CBEF 
CBF2 
CBF 4 
CCc04 
CC04 
CCOD 
CC10 
CC13 
CC15 
CC18 
CC1C 


Set error number and line 
Address of current statement 
Program pointer to ERROR 
Save line address and program pointer 
Stack pointer to C000 
Initialise descriptor stack 
Address of the ON-ERROR routine 
Flag for on-error treatment 
To interpreter loop 

Error number 

Calculate address of error message 
As current line number 
Diskette error 

Go to READY mode 

Address of ERROR line 

Get line number to HL 
Pointer to 'Division by zero' 
Error number 

Pointer to 'Overflow' 

Error number 

Address of ON-ERROR routine 
Error number in accumulator 
Output error message 

Stream number at zero 

Select stream 

Save old stream number 
Output error message 

Output LF 

Select 

Old stream number 

Initialise screen 

Output 'Undefined line' 
Output line number 

Output ‘tin line number 
‘Undefined line',0O 

Pointer to 'Break' 
Initialise screen 

Output error message 

Get line address 

Direct mode? 

Pointer to ‘in' 

Output string 

Output line number 
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CC1F 
CC24 
Kok Rk 
CC29 
CC2B 
CC32 


KkKKKKK 


CC34 
KkKKKKK 
CC3A 
CC3D 
cc40 
CC4A 
CC66 
CC6A 
CC6E 
CC70 
CC7B 
CC87 
CC8A 
CC8B 
CC8E 
CC92 
KKKKKK 
CC96 
CC97 
CC9B 
CC9C 
CC9E 
CCA2 
CCAS 
CCA8 
CCAC 
CCBO 
CCB6 
KkKKKKK 
CCBB 
CCBE 
cccl 
CCC2 
CCC6 
CCCB 


KKK KKK 


'Break' 
' dn -",0 
BASIC command STOP 


Output 'Break in line number' 
To READY mode 
BASIC command END 


Diskette error 

Save disk error 

Output error message 

"NOs: 32" 

To READY mode 

To READY mode 

Get line number to HL 

Direct mode? 

End of statement? 

Set current line address 
Direct mode? 

Yes 

Line address to HL 

Line address after interrupt 
Program pointer after interrupt 
BASIC command CONT 


Program pointer after interrupt 
Test for direct mode 

"Cannot CONTinue' 

Output error message 

Line address after interrupt 
Set current address line 

SOUND CONTINUE 

To interpreter loop 

Reset flag for on-error treatment 
Address of ON-ERROR routine 

ON ERROR 

Ignore blanks 

Test for following character 
‘GOTO' 

Get line number to DE 

Search for BASIC line DE 

Set address of ON-ERROR routine 
BASIC command ON-ERROR GOTO 0 


297 


First Publishing Anatomy of the CPC's 





CCCD 
CCDO 
CCD4 
CCD5 
kkk KK 
CCD8 
CCDA 
CCDE 
CCE2 
CCE8 
CCEB 
CCEF 
CCF2 
CCF6 
CCFA 
CCFD 
CD01 
CD03 
CDO7 
CDOA 
CDOD 
CD10 
CD13 


KkKKKKK 
KakKKKK 


CE76 
CE79 
CE7D 
CE7E 
CE80 
CE82 
CE85 
CE89 
CE8A 
CE8B 
CE8C 
KkKKKKK 
CE8F 
CE95 
CE96 
CE98 
CE99 
CE9A 


ON-ERROR address at zero 
On-error treatment? 

No 

Error output 

BASIC command RESUME 


"NEXT! 

Get line address 

On-error treatment? 

To interpreter loop 

On-error treatment? 

To interpreter loop 

Ignore blanks 

On-error treatment 

Ignore rest of line 

On-error treatment? 
‘Unexpected RESUME' 

No, output error message 
Delete ERROR number 

Reset flag for on-error treatment 
Address of ERROR line 

As current line address 
Program pointer to ERROR 
Error messages 

Output error message 

Base address of error messages 
Set pointer to error message 
Get character of error message 
Reset bit 7 

Printable character? 

Yes, output 

No, set error message 

Get character again 

Increment counter 

Test bit 7 

Not set, continue to output 
Set pointer DE to error message 


Number zero? 
Finished 

Error number to B 
Get character 
Increment counter 


298 


First Publishing Anatomy of the CPC's 





CE9B 
CE9C 
CE9E 
CEAO 
KR KKK 
CEBB 
CEBF 
CEC1 
CEC4 
KR KR 
CEC6 
CECC 
CECE 
KR KKK 
CED1 
CEDS5 
CED6 
CED7 
KR KK 
CEDB 
CEEO 
CEE6 
CEE9 
CEEC 
Kok KK 
CEF8 
CEFE 
KR KK 
CF06 
CFO9 
KR KK 
CFOC 
CFOF 
KR KK 
CF12 
CF15 
CF18 
CF1B 
CF1E 
CF1F 
CF22 
CF26 
CF2A 


Test bit 7 

Not set, ignore message 

Next error message 

DE now points to start of message 
Get 8-bit value 

Get integer with sign 

Hi byte 

Not equal to zero, ‘Improper argument' 
Adopt Lo byte 

Get 8-bit value not equal to zero 
Get integer value with sign 

Not equal to zero? 

‘Improper argument' 

Get 16-bit value 0 to 32767 

Get integer value with sign 

Hi byte 

Test bit 15 

Set, ‘Improper argument' 

Get integer value with sign 

Get expression 

CINT 

Get expression 

Test for string 

No 

Get 16-bit value, address expression 
Get expression 

UNT 

Get string expression and parameter 
Get expression 

Get string parameter 

Get string expression 

Get expression 

String type, otherwise 'Type mismatch' 
Get line number range 

1 and 

65535 as default 

Comma following? 

No, end of statement? 

Yes 

(ge 


Get line number to DE 
and to BC 
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Crec 
CF2F 
CF30 
CF33 
CF34 
CF38 
CF3B 
CF3C 
CF3F 
CF46 
* kK KKK 
CF4B 
CF4E 
CF50 
CF52 
CF54 
CF56 
CF5A 
CFSF 
CF62 
KaKKKKK 
CF65 
CF66 
CF68 
CF6D 
KkKKKKK 
CF70 
CF72 
CF78 
CF79 
CF7B 
CF7C 
CF7E 
CF7F 
CF81 
CF83 
CF86 
CF8A 
CF8D 
CF8E 
CF91 
CF95 
CF98 


Comma following? 
Yes 
Test for following character 


65535 as default final value 
Comma following? 

Yes 

Get line number to DE 
Comma following? 

‘Improper argument' 

Get line number to DE 
Constant type 

Value to DE 

Line number? 

Yes, finished 

Line address? 

No, ‘Syntax error' 

HL points to start of line 
Line number to DE 

Ignore blanks 

Get expression 


Hierarchy code zero 
Get term 

Ignore blanks 

Get term 


Get expression 

Operator 

tS 

Less than/ 

'NOT' 

Greater than, equal to? 

4 

less than, then comparison operator 
'+', then test for string 

No string 

String descriptor 

On stack 

Get expression 

String type, otherwise 'Type mismatch' 
String addition 

Process next term 


300 


First Publishing Anatomy of the CPC's 





KkKKKKK 


CF9A 
CF9B 
CF9E 
CFA2 
CFA9 
CFAB 
CFAD 
CFB3 
CFB4 
CFCO 
CFC3 
CFC6 
kkk kk 
CFC8 
CFCD 
CFCE 
CFD1 
CFD4 
CFD7 
CFDA 
CFDD 
CFDF 
CFE1 
CFE7 
CFEB 
CFEE 
kkk kk 
CFFO 
CFF3 
CFF 6 
CFF9 
CFFC 
CFFF 
D002 
DOOS 
D008 
DOOB 
tok KK Kk 
DOOE 
D012 
DO1D 


KkKeKKKK 





Arithmetic operators 


Minus #F4 

Times 4 

Plus #CFFO, table address 
Hierarchy code 

Less than, finished 

Place event on stack 
Hierarchy code 

Get term 

Reserve place on BASIC stack 
JP (DE), execute operation 
Process next term 
Comparison operators 


Token 

Minus offset 

Test for string 

Address for arithmetic comparisons 
No string 

String descriptor 

On stack 

Hierarchy code 

Get term 

String comparison 

Get result of comparison 

Process next term 

BASIC operators hierarchy codes + addresses 
F4, ty 


F5,'-' 

F6,'*! 

BV tf! 

F8,'*! 

F9, 'Backslash' 
FA, '‘AND' 

FB, 'MOD' 

FC;..7 YOR! 

FD, 'XOR' 


Arithmetic comparison 
Arithmetic comparison 


Adopt sign 
'-' negative sign 
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D020 
D022 
D026 
KaAKRKKK 
DO2B 
DO2D 
DO31 


KkKKKKK 


D036 
KKK KK 
D039 
DO3D 
D041 
D043 
D045 
D048 
DO4A 
DO4E 
DO51 
DO55 
D058 
DOSB 
Kk KK 
DO5C 
DO5D 
DOSE 
D062 
D065 
D068 
DO6B 
DO6E 
DO71 
DO74 
KR RK 
DO77 
DO7A 
DO7C 
DO7E 
D087 
D089 
DO8C 
DO8F 
D094 


Hierarchy code 

Get term 

Change sign 

BASIC operator NOT 
Hierarchy code 

Get term 

NOT operator 

Get expression 

Ignore blanks 

Get expression 
'Operand missing' 

Get variable 

Get numeric value 

twee 

Get string 

Function? 

To function calculation 
Base address of table 
Search table 

Ignore blanks, jump to function 
Output error message 
'Operand missing' 
Special functions 
Number of table entries 
Not found, 'Syntax error' 
eee | 

'4t 

se) 

'NOT' 

'ERL' 

"FN! 

"MIDS! 

Las 

Get variable 

Get variable address 
Not yet provided? 
Variable type 

String? 

String? 

Reset variable 
Pointer to zero 

as string descriptor 
String length zero 
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kkk KKK 


DO95 
DO9A 
DO9C 
DOAO 
DOA2 
DOA6 
DOA8 
DOAA 
DOAC 
DOAE 
DOB1 
DOB3 


wkKakKKKK 


DOB9 
KK RK 
DOCO 
DOCD 
DOD1 
KK KK 
DOD4 
DOD7 


kKkKKKK 


DODA 
KK RK 
DODD 
DODE 
DODF 
DODE 
DOES 
DOE9 
DOEC 
DOFO 
DOF6 
DOFA 
DOFC 
D100 
KKK KK 
D105 
D10A 
D10C 
D111 


KKK KKK 


Get numeric value 
Subtract offset 

Less than 10? 

Yes, get digit 
One-byte value? 

Yes 

Two-byte value (dec, hex, bin)? 
Yes 

Floating point value? 
Yes 

‘Syntax error' 

'Real' 

Set variable type 

Get two-byte value 


Get floating point value 


Variable type to 'Real' 
Ignore blanks 

'(' Get term in brackets 
Get expression 

Test: for. ©). 


‘Syntax error' 

Function calculation 

Increment program pointer 

Get token 

Ignore blanks 

Test token 

40 - 49, reserved variable 

Get address of reserved variable 
Test for '(' 

Token times 2 

‘Syntax error' 

Calculate function 

Get function argument in brackets 
Calculate function 

Calculate function 

Address of functions 

Reset Hi byte 

Add token times 2 

Execute function 

Get address of reserved variable 
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D113 
D115 
KARR 
D11A 
D11C 
D11E 
D120 
D122 
D124 
D126 
D128 
D12A 
D12C 


KaKKKKK 


D12E 
KKK KR 
D133 
D137 
Kok KKK 
D13D 
D140 


KKKKKK 


D146 
ee es 
D14B 
D14C 
D14F 
ee 
D151 
D154 
D1I5A 
D15F 
Kok KKK 
D164 
D165 
D168 
Kk RK 
D16C 
D16F 
Kk KK 
D174 
D177 
D179 


Double token 

Base address of table offset 
Address of reserved variable 
40, EOF 

41, ERR 

42, HIMEM 

43, INKEYS 

44, PI 

45, RND 

46, TIME 

47, XPOS 

48, YPOS 

49, DERR 

Reserved variable DERR 

Disk error number 

Reserved variable ERR 

ERROR number 

Convert accumulator contents to integer 
Reserved variable TIME 

KL TIME PLEASE 

Convert 4-byte value to floating point 
Reserved variable ERL 

Get ERROR line number 
Reserved variable HIMEM 


HIMEM 

Adopt value 

‘a', variable pointer 

Get variable address 

Not defined, ‘Improper argument' 
String? 

Adopt value 

Reserved variable XPOS 


GRA ASK CURSOR 

Column value to HL 

Reserved variable YPOS 

GRA ASK CURSOR 

Create integer in HL 

BASIC command DEF 

Test for following character 
'FN! 

Get line number to HL 
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D17D "Invalid direct command' 
D17F Output error message 
D182 Search for function 

D18A Ignore rest of statement 
xk*kkE*K BASIC function FN 

D18D Search for function 

D199 ‘Unknown user function' 
D19B Output error message 
D1A2 rm! 

D1A6 Ignore blanks 

D1AA Test for '(' 

D1B3 Get expression 

D1B8 Assign value to variable 
D1BC Comma following? 

D1BF No 

D1C2 Test. for," 

D1C5 Next variable 

D1C7 Test for ')' 

D1CB Test for ')' 

D1D1 Test for '=' 

D1D4 Get expression 

D1D7 ‘Syntax error' 

D1DA Test for string 

D1E5 Test for same variable type 


xxkxkk*k*k BASIC functions with several arguments 
D1E8 71, BINS 
D1EA 72, DECS 
D1EC 73, HEX$ 
D1EE 74, INSTR 
D1FO 75, LEFTS$ 
D1F2 76, MAX 
D1F4 77, MIN 
D1F6 78, POS 
D1F8 79, RIGHTS 
D1IFA 7A, ROUND, 
DIFC 7B, STRINGS 


D1IFE 7C, TEST 
D200 7D, TESTR 
D202 7E, COPYCHRS$ 
D204 7F, VPOS 


xkkkxkxk*k Addresses of BASIC functions 
D206 00, ABS 
D208 01, ASCI 
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D20A 02, ATN 

D20C 03, CHRS 

D20E 04, CINT 

D210 05, COS 

D212 06, CREAL 

D214 07, EXP 

D216 08, FIX 

D218 09, FRE 

D21A OA, INKEY 

D21C OB, INP 

D21E OC, INT 

D220 OD, JOY 

D222 OE, LEN 

D224 OF, LOG 

D226 10, LOG10 

D228 11, LOWERS 

D22A 12, PEEK 

D22C 13, REMAIN 

D22E 14, SGN 

D230 15, SIN 

D232 16, SPACES 

D234 17, SO 

D236 18, SOR 

D238 19, STRS 

D23A 1A, TAN 

D23C 1B, UNT 

D23E 1C, UPPERS 

D240 1D, VAL 

*x***k* BASIC function MIN 
D242 Flag for MIN 

*x*x**k* BASIC function MAX 
D246 Flag for MAX 

D248 Get expression 

D24B Comma following? 

D24E No, test for ')', done 
D251 Place variable on BASIC stack 
D254 Get expression 

D259 Release place in stack 
D25E Arithmetic comparison 
D267 Get result of comparison 
D26B Next argument 

***k***X BASIC function ROUND 
D26D Get expression 
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D270 
D273 
D276 
D279 
D27C 
D281 
D284 
D285 
D288 
D28B 
D290 
D293 
D294 
RK KKK 
D29B 
D2A1 
D2A4 
Kk KK 
D2AB 
D2B4 
Kk KR 
D2B7 
D2BD 
D2Cc0 
D2Ccl1 
D2C7 
D2CD 
D2D2 
D2D5 
D2DA 
D2DD 
KKK KKK 
D2DE 
D2E0 
D2E3 
D2E4 
D2E8 
D2EA 
D2EB 
D2EC 
D2ED 


aRaAKKKK 


D2F0 


And place on BASIC stack 

Comma following? 

Default zero 

Yes, get integer value with sign 
Test for ')' 

39 

Add 

719 

Comparison HL <> DE 

Greater than, ‘Improper argument' 
Release place in BASIC stack 
Rounding number to B 

Round number 

BASIC command CAT 

Interrupt disk I/O 

DISK CATALOG 

Save diskette errors 

BASIC command OPENOUT 


DISK OUT OPEN 
BASIC command OPENIN 


Output error message 

'File type error' 

Get filename 

DISK IN OPEN 

Get string expression and parameter 
Test for system messages 

Save diskette error 

Output error message 

‘File already open' 

Test for system messages 


No filename? 

First character of filename 

tur 

No 

Set pointer to second character 
Decrement length 

Reverse flag 

CAS NOISY 

BASIC command CLOSEIN 
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D2F1 
KKK KR 
D2F8 
D2F9 
D2FC 
KKK 
D303 
D306 
D30C 
KKK KK 
D316 
D319 
D31C 
D31F 
D322 
D326 
D329 
D32C 
D32F 
D333 
D336 
D339 
D33C 
D33E 
D341 
D344 
D347 
D34A 
D34C 
D34F 
D352 
D356 
D359 
D35F 
KKK KK 
D362 
D365 
D366 
D368 
D36C 
D36F 
D370 
D371 


DISK IN CLOSE 
BASIC command CLOSEOUT 


DISK OUT CLOSE 
Save diskette error 
Interrupt disk I/O 


DISK IN ABANDON 

DISK OUT ABANDON 

BASIC command SOUND 

Get 8-bit value 

Channel status 

Test: for: *,;.7 

Get argument to 4095 

Tone period 

Comma following? 

Default value 20 

Yes, get integer value with sign 
Duration 

Max. 15, default 12 

Get arguments if available 
Volume 

Max. 15, default 0 

Get arguments if available 
Volume envelope 

Get arguments if available 
Tone envelope 

Max.31, Default 0 

Get arguments if available 
Sound period 

End of statement, otherwise 'Syntax error' 
Address of sound block parameter 
SOUND QUEUE 

To interpreter loop 

if available, get 8-bit value 
Comma following? 

Load default value 

No comma, finished 


' ' 
tf 


Get 8-bit value 

Compare with maximum value 
Less than, OK 

‘Improper argument' 
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eS 


KKKKKK 


D373 
D375 
D379 
KK KKK 
D37E 
D383 
D384 
D386 
D387 
D389 
D38A 
D38C 
D38D 
D390 
D393 
Kk KKK 
D396 
D39E 
KKK KKK 
D3Al1 
D3A4 
D3A6 
D3AC 
D3Bl1 
D3B5 
D3BB 
D3BF 
D3C2 
D3C4 
D3C7 
D3CA 
DC3D 
D3D0 
D3D2 
D3D5 
KKK KKK 
D3D7 
D3DD 
D3E2 
D3E3 
D3E5 
D3E7 


BASIC command RELEASE 

8 

Get 8-bit value < 8 

SOUND RELEASE 

BASIC function SQ 

CINT 

Test bit 0 

Set? 

Test bit 1 

Set? 

Test bit 2 

Not set, ‘Improper argument' 
Hi byte greater than zero? 
Yes, ‘Improper argument' 
SOUND CHECK 

Convert accumulator contents to integer 
Get argument -128 to +127 
Get integer value with sign 
‘Improper argument' 

BASIC command ENV 

Get 8-bit value not equal to zero 
Greater than, equal to 16? 
Yes, ‘Improper argument' 
Get parameter 

Address of parameter block 
SOUND AMPL ENVELOPE 

tat 

Ignore blanks 

16 

Get 8-bit value < 16 

Set bit 7 

Test.for";:' 

Get 16-bit value 

128 

Get 8-bit value < 128 

Get 2 arguments 

BASIC command ENT 

GEt argument -128 to +127 
Zero? 

Zero? 

‘Improper argument' 
Greater than, equal to 16 
‘Improper argument' 
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D3ED 
D3F2 
D3FB 
D401 
D405 
D408 
D412 
D414 
D418 
D41B 
D41F 
D422 
kk RK 
D428 
D42B 
D432 
D439 
D44C 
ee Ss 
D44F 
D452 
D453 
D455 
Kk KR Ke 
D459 
D45C 
D45F 
D462 
D465 
D468 
D46D 
D470 
KOR RK 
D473 
D477 
D483 
D486 
Kk KK 
D489 
D48D 
D491 
D494 
D497 


Get parameter 

Address of parameter block 
SOUND TONE ENVELOPE 

tat 

Ignore blanks 

Get argument 0 to 4095 

240 

Get 8-bit value < 240 

Test for ',' 

Get argument -128 to +127 
Test for ',' 

Get 8-bit value 

Get parameter for ENT & ENV 


Comma following? 

JP (DE) 

Address of parameter block 

End of statement, otherwise 'Syntax error' 
Get argument 0 to 4095 

Get integer value with sign 

Hi byte 

Bits 12 - 15 set? 

Yes, ‘Improper argument' 

BASIC function INKEY 

CINT 

80 

Comparison HL <> DE 

‘Improper argument' 

KM TEST KEY 

-1 if not depressed 

Result to L 

Adopt integer in HL 

BASIC function JOY 

KM GET JOYSTICK 

CINT 

Convert accumulator contents to integer 
‘Improper argument' 

BASIC command KEY 

"DEF! 

Get 8-bit value 

Test for ',' 

Get string expression and parameter 
String length to C 
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D499 
D49B 
D49C 
D4A0 
KKK KKK 
D4A3 
D4A6 
D4A8 
D4AC 
D4AaF 
D4B1 
D4BA 
D4BF 
D4C2 
D4C5 
D4C8 
D4CB 
D4CE 
D4D1 
D4D3 
D4D9 
KR KR KKK 
D4DE 
D4E2 
D4E4 
D4E9 
D4EB 
D4EE 
kK KR 
D4F1 
D4F2 
D4F5 
D4F9 
D4FC 
D503 
KKK KKK 
D508 
D50B 
D50D 
D511 
D517 
D519 
D51B 


Key number to B 
String address to HL 
KM SET EXPAND 
‘Improper argument' 
KEY DEF 

Ignore blanks 

80 as maximum value 
Get 8-bit value < 80 
Test? for: *,-" 

2 

Get argument < 2 

KM SET REPEAT 

KM SET TRANSLATE 
Test for another argument 
KM SET SHIFT 

Test for another argument 
KM SET CONTROL 

Comma following? 

No, finished 

Get 8-bit value 

Jump to (HL) 

BASIC command SPEED 
'WRITE' 

"KEY' 

KM SET DELAY 

'INK' 

SCR SET FLASHING 
"Syntax error' 

SPEED KEY & INK 


Ignore blanks 

Get 8-bit value not equal to zero 
Test for ',' 

Get 8-bit value not equal to zero 
Jump to (BC) 

SPEED WRITE 

Ignore blanks 

2 

Get argument < 2 

167 

Zero? 

No, double time constant 

CAS SET SPEED 
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LT 


KaKKKK 


D520 
D521 
D524 
D527 


KKKKKK 


D52C 
kok RK 
D530 
D531 


KaKKKKK 


D534 
KOR ak 
D539 
D53B 
D53F 
D542 
D548 
D54C 
D54F 
D552 
D553 
D556 
D559 
kok kK KK 
D55C 
D55E 
D562 


KKKKKK 


D563 


KKKKKK 


D568 


KKKKKK 


D56D 


KaKKKKK 


D572 


KaKKKKK 


D577 


KKKKKK 


D57C 
KKK RK 
D581 
D586 


Reserved variable PI 


Set type to 'Real' 
Variable type to C, HL to variable 
Get PI 

BASIC command DEG 
Flag for DEG 

BASIC command RAD 
Flag for RAD 

Set DEG/RAD mode 
BASIC function SQR 
SQR function 

BASIC operator '“*' 


CREAL 

Buffer store for floating point variable 
Copy variable from (DE) to (HL) 
Set variable type and address 
Exponentiation 

Execute function 

Error-free? 

"Division by zero' 

‘Overflow' 

‘Improper argument' 

Execute floating point function 


CREAL 

Execute function 
BASIC function EXP 
EXP function 

BASIC function LOG10 
LOG10 function 
BASIC function LOG 
LOG function 

BASIC function SIN 
SIN function 

BASIC function COS 
Cos function 

BASIC function TAN 
TAN function 

BASIC function ATN 
ATN function 

"Random number seed?',0 
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KkRKKK 


D59C 
D59E 
DSA5 
D5A8 
D5AB 
D5AE 
D51B 
D5B4 
DSB6 
D5BA 
D5BC 
D5SBF 
KK RRR 
D5C4 
D5C5 
D5C9 
DSCC 
D5CF 
D5D3 
DS5D6 
D5D9 
D5DB 
D5E0 
D5E5 
DS5SE8 
Kok RR KR 
DS5ED 
DSFO 
DSF3 
DSF6 
DSF9 
Kk Re 
D5FD 
D600 
D602 
D60A 


KKKKKK 


D611 
kkk RK 
D61A 
D61C 
D620 


BASIC command RANDOMIZE 


Get expression 
‘Random number seed'? 
Output 

Get input line 

Output LF 

Read input 

Invalid, repeat 
Ignore blank, TAB and LF 
Invalid, repeat 

CREAL 

SET RANDOM SEED 
Reserved variable RND 


ies (ees 

Ignore blanks 

Repeat expression 

Test for ')' 

CREAL 

SGN 

Not equal to zero? 

Get last RND value 
Negative, SET RANDOM SEED 
Set type to floating point 
RND 

Reset variable counter 
Clear table 

End of program 

Start of variable 

Start of array 

End of array 

Clear table 

Basis of table 

54 = 2*27, A-Z plus functions 
Delete from #ADB7 to #ADEC 
Delete from #ADED to #ADF2 
Reset flag for FN 


Calculate table address 
re 

Start of variable 

Minus 1 


313 


First Publishing Anatomy of the CPC's 





D621 
D624 
ee as 
D62A 
D62E 
D632 
D635 
kkk 
D63B 
D63E 
D641 
D642 
D646 
D64B 
D64E 


KaKKKK 


D653 


kKkKKKKK 


D657 
KaKKKKK 
D65B 
D65D 
D65E 
D661 
D663 
D665 
D668 
D66C 
D66F 
D672 
D674 
D675 
D678 
D67B 
D67E 
D681 
D684 
D687 
D688 
D68B 
D68C 
D68E 


KaKKKKK 


Times 2 

Plus #AD35 

Calculate table address for array 
Start of array 

Minus 1 

Times 

Plus #ADED 

All variables to REAL type 
"AZ" 

"Real' type 

Number to A 

Less than 1, then ‘Syntax error' 
Basis of table equal to #ADB2 
Letter equal to pointer in table 
All letters 

BASIC command DEFSTR 
"String' type 

BASIC command DEFINT 
'Integer' type 

BASIC command DEFREAL 
'Real' type 

Get letter 

Test for letter 

"Syntax error' 

To BC (from - to) 

Ignore blanks 

ee 

Ignore blanks 

Test for letter 

"Syntax error' 

Up to 

Ignore blanks 

Set variable type 

Comma following? 

Yes, continue 

"Syntax error' 

Output error message 
‘Subscript out of range' 
Output error message 

‘Array already dimensioned' 
Ze oHIC TE 

Command extension 

BASIC command LET 
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D691 
D695 
D698 
D69D 
KR KR KR 
D6A2 
D6A3 
D6A6 
D6A8 
D6AB 
D6AE 
D6B2 
D6B6 
Kk KKK 
B6B9 
D6BC 
D6BFE 
KK KK 
D6C2 
D6C5 
D6C8 
KKK KK 
D6CC 
D6CF 
D6D2 
D6éD5 
Dé6éD6 
KR KKK 
D6DE 
D6E4 
D6EA 
D6EF 
D6F5 
D6F6 
D6FC 
D705 
D70C 
D712 
D715 
D718 
D72A 
D72E 
D733 


Get variable 

Test for '=' 

Get expression 

Assign value to variable 
Assign value to variable 
Compare 

variable type 

and result type 

Type match, otherwise 'Type mismatch' 
Test for string 

No, copy variable to (HL) 
String management 

Convert pointer to string 
BASIC command DIM 
Dimensioning 

Comma following? 

Yes, next variable 

Search for variable 

Read variable name 

Test for dimensioned variable 
Get variable type 

Get variable address 

Read variable name 

Test for dimensioned variable 
Get variable type 

First letter 

Calculate table position 
Search for function 

Read variable name 

Calculate table position for FN 
Apply function 

Read variable name 

First letter 

Calculate table position 

Type of variable 

Start of variable 

Type of variable 

Read variable name 

Test for subscripted variable 
Get type of variable 

Search for array 

Found? 

Search for array 
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D736 
Kk RK 
D75B 
D77A 
D787 
D78B 
D78E 
D7C6 
D7C9 
RK KR 
D7E4 
D7E8 
D7EC 
D7EE 
D7F6 
D7F9 
D7FC 
DUFF 
KKK RK 
D80A 
D80C 
D810 
D817 
Kok RK 
D820 
D827 
D830 
D833 
D836 
D839 
D845 
D857 
D85C 
Kk KKK 
D887 
D888 
D88B 
D88E 
D88F 
D891 
D897 
D89B 
D89E 


Found? 

Search for array 

Type of variable 

Set bit 6, 'FN' 

Start of array 

Reserve place in variable range 
Increment pointer for array range 
LDIR 

Type of variable 

Dimensioning 

Get name of variable 

met 

ee 

"Syntax error' 

Type of variable 

Calculate table position for array 
Search for array 

Found, 'Array already dimensioned' 
Test for dimensioned variable 


mE 

be Gates 

Start of variable 
Dimensioned variable 


Start of array 

Type of variable 

Calculate table position for array 
Search for array 

Not found? 

"Subscript out of range' 

Number of dimensions 

Array limit to DE 

Read subscripts 


Ignore blanks 

Save 

type of variable 

Number of subscripts 

Get 16-bit value 0 - 32767, subscript 
Reserve place on BASIC stack 
Subscript on BASIC stack 

Increment number of subscripts 
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D89F 
D8A2 
D8A5 
D8A9 
D8AB 
D8AE 
D8B2 
D8C4 
D8C8 
D8D5 
D8E3 
D92B 
D92D 
KaKKKKK 
D935 
D93D 
D93E 
D941 
D942 
D943 
D945 
D94B 
D988 
D991 
D995 
D997 
D99B 
D99D 
D99E 
D9A1 
D9A3 
D9A7 
D9A8 
D9AA 
D9BO 
Kk RR KR 
D9B3 
D9B6 
D9B8 
D9BA 
D9BC 
D9BE 
D9CO 


Comma following? 

Yes, next subscript 

iy Yi 

¥] ' 

‘Syntax error' 

Ignore blanks 

Restore type of variable 

End of array 

Reserve place in variable range 
Type of variable 

10, default value for subscript 
2 bytes 

Release place on BASIC stack 
Read name of variable 
Determine type of variable 
Variable already provided 

No 

Ignore letters of the name 
Test bit 7 

Last letter? 

Ignore following blanks 

Set pointer to type of variable 
Type of variable 

#05 + #09 => #0D 

40 

Reserve place on BASIC stack 
41 

Already 40 characters? 

Yes, then ‘Syntax error' 

Read next character from name 
Convert lower case to capitals 
Last character? 

No 

Set BASIC stack pointer 

Ignore following blanks 
Determine type of variable 


Less than #0B? 

-#09, #0D => #05 

'!', real variable? 
Set type to ‘'real' 
‘Syntax error, 

'$', Integer variable? 
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D9C2 
D9C4 
D9C7 
D9CY 
KKKKKK 
D9CD 
D9DO 
D9D4 
D9D7 
D9DA 
D9ES 
KR KKK 
D9OF4 
D9F7 
DOFA 
D9FD 
kK KK 
DAOO 
DA04 
DAO7 
DAOA 
DAOD 
DA16 
DALF 
DA33 
DA35 
DA71 
DA75 
DA88 
DA8D 
DAAC 
DABO 
DAB1 
DAB8 
DAB9 
DABD 
DAC8 
DAE2 
DB10 
KKK KKK 
DB18 
DB1B 
DB1C 


Or 'S', string? 

No, ‘Syntax error' 
'Real' 

Save type of variable 
Update type of variable 
Clear table for arrays 
End of array 

Start of array 
Comparison HL <> DE 

No arrays 

Calculate table position for array 
BASIC command ERASE 


Clear array 

Comma following 

Yes, next array 

Clear array 

Read name of variable 

Type of variable 

Calculate table position for array 
Search for array 

Not found, ‘improper argument' 
BC:= HL - DE 

Update array table 

6 bytes 

Reserve place on BASIC stack 
Reserve place on BASIC stack 
Determine type of variable 
Type of variable 

Reserve place on BASIC stack 
26 letters, 'A' 

First letter of name 
Calculate table position 

Next letter 

All letters already? 
Calculate table position for array 
Start of array 

Comparison HL <> BC 

Jump to (HL) 

BASIC command LINE 

Test for following character 
‘INPUT' 

Get channel number 
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DB1F 
DB22 
DB25 
DB2A 
DB2D 
DB31 
KAR KKK 
DB36 
DB39 
DB42 
KKK KKK 
DB48 
DB4B 
DB4F 
DB59 
DBSC 
kak KKK 
DB60 
DB63 


KkKKKKK 


DB7E 
KKK KKK 
DB90 
DB91 
DB93 
DB96 
DB99 
DB9B 
DBAO 
DBA3 
DBA4 
DBA7 
DBAC 
DBAE 
DBB1 
DBB3 
DBC6 
DBCE 
DBD1 
DBD5 
DBDF 
DBE1 
DBES5 


Output conversation string, if any 
Search for variable 

'String' type, otherwise 'Type mismatch' 
Get input from active device 

Place string on descriptor stack 

Assign result to variable 

Get input from active device 


Get input from diskette 


'.t 
, 


BASIC command INPUT 
Get channel number 
Get input and convert 
Search for variable 
Comma following? 

Yes, next variable 
Get input and convert 


Output conversation string, if any 


'?Redo from start',LF,0 
Output conversation string, if any 
vex 

Save separating character 
Ignore blanks 

towel 

No string? 

Comma following? 

Yes 

Test for following character 
'.! 

a 

Output 

tt 


Output 

'Type mismatch' 

Output error message 

'Type mismatch' 

Get variable name and type 
'String' 

Yes, get string parameter 
Comma following? 
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DBEA 
DBEC 
DBFD 
DC13 
DC22 
DC25 
DC28 
DC2A 
DC39 
DC3C 
DC42 
DC53 
DC56 
DC59 
DCSF 
DC64 
DC6A 
DC7F 
DC82 
DCA4 
DCA7? 
DCAA 
DCBE 
DCC1 
DCC4 
DCC7 
DCCA 
kkk kkk 
DCCD 
DCCF 
DCD3 
DCD7 
DCDA 
DCDD 
kk KKK 
DCDF 
DCEO 
DCE3 
DCE7 
DCEC 
DCF 6 
DCFA 
DCFD 


No 


' ' 


Test for string 

Ignore blank, TAB and LF 
Enter string in descriptor 
Ignore blank, TAB and LF 
tot 

Read string 

Output error message 
‘EOF met' 

tet 

Start of input buffer 
First character equal to zero 
towet 

‘EOF met' 

Start of input buffer 

JP (DE) 

CR 

I ie 

LF + CR 

CR? 

LF? 

Le ee 

CR 

vt 

TAB 

LF 

BASIC command RESTORE 
No line number? 

Get line number to DE 
Search for BASIC line DE 
Set DATA pointer 

Start of program 

As DATA pointer 

BASIC command READ 


DATA pointer 

Get next DATA element 
Search for variable 
'.t 


' ' 
, 


Line address during READ command 
Set current line address 
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DDOO 
DDO4 
DDO8 
DDOA 
DD10 
DD13 
DD16 
DD17 
DD1A 
DD1C 
DD1E 
DD20 
DD23 
DD27 
DD2A 
DD2C 
DD2F 
DD30 
KR KK 
DD3C 
DD41 
DD42 
DD47 
KR KK 
DD4F 
DD50 
DD53 
DD54 
KR RRR 
DD57 
DD58 
DD59 
DD5C 
DD5D 
KR KK 
DD60 
DD63 
DD66 
KKK KK 
DD6C 
DD6D 
DD6E 
DD70 


"Syntax error' 

Comma following? 

Yes 

DATA pointer 

' ' 

Ignore rest of line 
End of line? 

No 

Line length 

Zero, end of program? 
DATA exhausted 

Output error message 
Line address during READ command 
Ignore blanks 

'DATA' 

No, continue search 
Save sign 

Form absolute value 
Adopt sign B 


Sign of event 

Negative, then sign change 
Invert sign bit 

Integer addition HL:=DE + HL 
Reset carry flag 

Addition 

Result positive? 

Set flags 

Integer subtraction HL := DE - HL 
Interchange operands 

Reset carry flag 

Subtraction 

Result positive? 

Set flags 

Signed integer multiplication 
Define sign of result 
Unsigned multiplication 
Adopt sign 

Define sign of result 

Sign of HL 

And sign of DE 

to B 

Form absolute value of DE 
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DD74 


KKKKKK 


DD77 
Kok RK 
DDA1 
DDA4 
RR 
DDA8 
DDAQ 
DDAC 
DDAD 
DDAE 


KKKKKK 


DDBO 
KR RR 
DDEF 
DDF1 


KkeKKKK 


DDF2 
Kk RK 


DDFE 
KR RK K 
DEO7 
DEO8 
DEOA 


kKaKKKK 


DE1A 


aRkKKKKK 


DE1E 


KaKKKKK 


DE22 


wKkKKKKK 


DE26 
KaKKKK 
DE2A 
DE2B 
DE2D 
DE2E 
DE2F 
KKKKKK 
DE31 
DE33 
DE35 


Form absolute value of HL 
Unsigned integer multiplication 


Signed integer division 
Division HL:=HL / DE 
Adopt sign 

Integer MOD calculation 
Save sign 

Division 

Remainder to HL 

Get back and 

adopt sign 

Division HL :=HL / DE, DE := remainder 
Define sign of result 
Form absolute value 
Test sign 

Positive, finished 
Integer sign change 


SGN sign of HL 


Comparison HL <> DE 

Sign of HL 

And sign of DE 

Compare numbers with same sign 
Test for following comma 

' ' 

Test for brackets open 

me J 

Test for brackets closed 

ey 

Test for equals sign 

tat 

Test for following character 
Get return address 

Get character 

Get back progam pointer 
Compare signs 

"Syntax error' 

Ignore blanks 


Continue testing for blanks 


322 


First Publishing Anatomy of the CPC's 





DE37 
kkk kKK 
error' 
DE3C 
DE40 


kkk KKK 


DE42 
Hk kk 
DE46 
DE47 
DE4A 
DE4D 
kK RR 
DES2 
DE53 
DE54 
DES58 
DE5C 
DE60 
kk kk 
DE62 
DE65 
DE68 
DE6B 
DE6E 
DE71 
DE74 
DE75 
DE77 
DE79 
DE7D 
DE7E 
DE80 
DE82 
DE86 
DE8A 
DE8C 
DE8F 
DE91 
kkk RK 
DE94 
DE95 
DE9A 


End of statement? 
Test for end of line, otherwise ‘Syntax 


"Syntax error' 
Test for end of statement 


Test for comma 


Ignore blanks 

' ' 

Ignore blanks 

Ignore blank, TAB and LF 

Get character 

Increment pointer 

wt 

TAB 

LF 

Decrement pointer 
Interpreter loop 

Address of current statement 
Set address of current statement 
KL POLL SYNCHRONOUS 

Event processing (AFTER/EVERY) 
Ignore blanks 

Execute BASIC command 

Read program text 

':', end of statement? 

Yes 

"Syntax error' 

Line length 

Equal to zero 

Yes, to END command 

Save current line address 
TRACE flag set? 

No 

TRACE routine 

To start of interpreter loop 
To END command 

Execute BASIC command 

Token times 2 

Test for command extension 
Invalid token, 'Syntax error' 
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DEQF Plus #DEE5 (table address) 


DEA7 Command address on stack 

DEA9 Ignore blanks, jump to command 
DEAC "Syntax error' 

xkkkxkxkk Current line address to zero 
DEAF Zero 

DEB2 As current line address 

kkkkkkK Toad current line address 

DEB6 Current line address 

xxkk*kk ©6©Test direct mode / get line address 
DEBA Current line address 

DEBF Zero, direct mode 

DEC2 Line number to HL 

xkxxk*k*k*k BASTC command TRON 

DEC6 Set flag 

xxk*kk*k*k BASIC command TROFF 

DECA Reset flag 


kxkkkkk TRACE routine 
DECF Output 


DED1 ret 

DED5 Current line address 
DED 9 Line number to HL 
DEDC Output line number 
DEEO Output 

DEE2 eye 

xxxk*xkx*k Addresses of BASIC commands 
DEE5 80, AFTER 

DEE7 81, AUTO 

DEE9 82, BORDER 

DEEB 83, CALL 

DEED 84, CAT 

DEEF 85, CHAIN 

DEF 1 86, CLEAR 

DEF3 87, CLG 

DEF5 88, CLOSEIN 

DEF7 89, CLOSEOUT 

DEF 9 8A, CLS 

DEFB 8B, CONT 

DEFD 8C, DATA 

DEFF 8D, DEF 

DFO1 8E, DEFINT 

DFO3 8F, DEFREAL 

DFO4 90, DEFSTR 
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DFO7 91, DEG 
DFO9 92, DELETE 
DFOB 93, DIM 
DFOD 94, DRAW 
DFOF 95, DRAWR 
DF11 96, EDIT 
DF13 97, ELSE 
DF15 98, END 
DF17 99, ENT 
DFi9 9A, ENV 
DF1B 9B, ERASE 
DF1D 9C, ERROR 
DF1F 9D, EVERY 
DF21 9E, FOR 
DF23 9F, GOSUB 
DF25 AO, GOTO 
DF27 rea 
DF29 A2, INK 
DF2B A3, INPUT 
DF2D A4, KEY 
DF2F A5, LET 
DF31 A6, LINE 
DF33 A7, LIST 
DF35 A8, LOAD 
DF37 A9, LOCATE 
DF39 AA, MEMORY 
DF3B AB, MERGE 
DF3D AC, MIDS 
DF3F AD, MODE 
DF41 AE, MOVE 
DF 43 AF, MOVER 
DF45 BO, NEXT 
DF47 Bl, NEW 
DF49 B2, ON 
DF4B B3, ON BREAK 
DF4D B4, ON ERROR GOTO 0 
DF4F B5, ON SQ 
DF51 B6, OPENIN 
DF53 B7, OPENOUT 
DF55 B8, ORIGIN 
DF57 B9, OUT 
DF59 BA, PAPER 
DF5B BB, PEN 
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DF5D BC, PLOT 

DF5F BC, PLOTR 

DF61 BE, POKE 

DF63 BF, PRINT 

DF65 co,' 

DF67 Cl, RAD 

DF69 C2, RANDOMIZE 
DF 6B C3, READ 

DF6D C4, RELEASE 
DF6F C5, REM 

DF71 C6, RENUM 

DF73 C7, RESTORE 
DF75 C8, RESUME 

DF77 C9, RETURN 
DF79 CA, RUN 

DF7B CB, SAVE 

DF7D CC, SOUND 

DF7F CD, SPEED 

DF81 CE, STOP 

DF83 CF, SYMBOL 

DF85 DO, TAG 

DF86 D1, TAGOFF 

DF89 D2, TROFF 

DF8B D3, TRON 

DF8D D4, WAIT 

DF8F D5, WEND 

DF91 D6, WHILE 

DF93 D7, WIDTH 

DF95 D8, WINDOW 

DF97 D9, WRITE 

DF99 DA, ZONE 

DF 9B DB, DI 

DF9D Dc, EI 

DF9E DD, FILL 

DFA1 DE, GRAPHICS 
DFA3 DF, MASK 

DFA5 EO, FRAME 

DFA7 E1, CURSOR 
DFAA Start of free RAM'S 
DFB2 Max. 300 characters 
DFB5 Get character from buffer 
DFB9 Last character? 
DFBA No 
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DFBE 301 - counter reading 
DFCO Equal to line length 

DFC3 To B 

DFC6 Three times zero as termination 
kkkkk*k Get character from input buffer 
DFCD 

DFCE Last character? 

DFDO Letter? 

DFD3 Yes 

DFD5 Numeric? 

DFD8 Yes 

DFDB "G&'? 

DFDD Yes 

DFE1 Token? 

DFE2 Yes 

DFE3 a 

DFE8 Ignore additional blanks? 
DFEC Yes 

DFED Ns 

DFEF Write to buffer 

DFF5 "REM! ? 

DFF7 Yes 

DFFB Base address of table 
DFFE Search table 

E002 Found, then do not convert remainder 
E005 'ELSE' 

E009 Write to buffer 

EO0OD Write character to buffer 
EQOE Increment buffer pointer 
EOOF Decrement counter 

E011 Counter equal to zero? 
E012 No 

E013 Output error message 

E016 "Line too long' 

kkkk*k Special token 

E017 "DATA' 

E018 'DEFINT' 

E019 'DEFSTR' 

EOQ1A 'DEFREAL' 

E01B End of table 

kak KKK 

EQ1C Write to buffer 

E020 End of buffer? 


327 


First Publishing Anatomy of the CPC's 





E022 
E026 
E028 
E02B 
E02F 
E031 
E03B 
E044 
E047 
E052 
E058 
E05B 
E069 
E06B 
E06E 
EO6F 
E07C 
E086 
E08B 
E090 
E094 
E097 
E09D 
E0A3 
EOB6 
E0B9 
kk RK 
E0C8 
E0C9 
EOCA 
EOCB 
EOCC 
EOCD 
EOCE 
EOCF 
EODO 
EOD1 
E0D2 
E0D3 
EOD4 
EOD5 
EOD6 
EODA 


Increment buffer pointer 
Token? 


Flag for end of statement 
Convert lower case into capitals 
Calculate addresses of command words 
Test for letter or figure 
'RN! 

Test for letter or figure 
"Function, 

Write to buffer 

Function token 

Write to buffer 

Test for letter or figure 
Token for variable 

Token for real variable 
Write to buffer 

Twice zero for variable address 
Write to buffer 

Test for letter or figure 
Write to buffer 

Base address of table 
Search table 

Commands with line numbers 
"RESTORE' 

"AUTO! 

"RENUM'! 

'DELETE' 

VEDIT 

"RESUME! 

'ERL' 

'ELSE' 

‘RUN' 

'LIST' 

'GOTO' 

'THEN' 

"GOSUB' 

End of table 

tye 


"et 
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EODD 
EOF9 
E105 
E108 
E112 
E119 
E11D 
E121 
E123 
E128 
E12F 
E134 
E145 
E14B 
E152 
E158 
E161 
E165 
E16B 
E16D 
E172 
E187 
E18B 
E190 
E19A 
E1Al 
E1A5 
kk kk 
E1A8 
1EAB 
E1AF 
E1B2 
E1B3 
E1B4 
E1B7 
E1BA 
E1BC 
E1C3 
E1C6 
E1C8 
E1CB 
E1CE 


KKK KKK 


Mgt 

Token for line number 
Test for string 

Token for floating point number 
Token for two-byte number 
10 

Add offset 

Token for one-byte number 
Write to buffer 

Write to buffer 

Write to buffer 
Comparison HL <> DE 

Token for binary number 
Write to buffer 

Get variable type 

Write to buffer 

twee 

'1', command extension 
or 

Token for 'PRINT' 

Address of the BASIC operators 


Write to buffer 


Write to buffer 

toe 

Write to buffer 

Process command extension 
Write to buffer 

Zero 

Write to buffer 

Next character 

Increment pointer 

Test for letter or figure 
Yes, then to buffer 

Pointer one back 

At last character, set bit 7 
Write to buffer 

Write to buffer 

Character 

Write up to end of line to buffer 
BASIC command LIST 
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E1D2 
E1D7 
E1DA 
E1DD 
E1E2 
E1E5 
KKK KKK 
E1E8 
E1E9 
E1EB 
E1F0 
E1F5 
E1F6 
E1FA 
E201 
E205 
E209 
E20B 
E20E 
E211 
E214 
E215 
E217 
E219 
E21F 
E222 
E225 
E226 
E228 
E22B 
E22E 
E232 
E234 
E23A 
E249 
E26B 
E27C 
E27E 
E290 
E294 
E299 
E29D 
E2A8 


Get line number range 

Get channel number 

End of statement, otherwise 'Syntax error' 
Current line address to zero 

List lines 

To READY mode 

List BASIC lines BC - DE 


Line number to DE 

Search for BASIC line DE 
End of program? 

Finished 

Interrupt by 'ESC' 

Add line length 

Next line number to DE 
Comparison HL <> DE 
Greater than last line number? 
List BASIC line in buffer 
Pointer to buffer 

Output character 
Increment pointer 

Next character 

Not yet end? 

Output LF 

List next line 

Output channel less than 8? 
Load character 

Yes, screen output 

Output character 

LF 

CR 

Control character? 

Output as printable character 
Output character 

Pointer to buffer 

Command token? 

Output constants 

'l', command extension 
CaN 

'ELSE' 
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E2CF 
E2D0 
kkk Rk 
E2D6 
E2D8 
E2DC 
E2DD 
E2DE 
E2DF 
E2E1 
E2E3 
E2E6 
E2E8 
E2ED 
E2EF 
E302 
E324 
E337 
E33F 
E343 
E347 
E34B 
E34F 
E356 
E35B 
E376 
E38D 
E398 
E38A 
E3AE 
E3B3 
E3BF 
E3C1l 
E3CA 
E3CC 
E3D2 
E3F6 
E3FA 
Kk KR KKK 
E41D 
E41F 
E421 
E423 


Write character to buffer 
Increment buffer pointer 
List command extension 


Write to buffer 

Next character 

Increment pointer 

End of line 

No 

Reset bit 7 

Write to buffer 

Last character? 

No, next character 

tt 

Write to buffer 
Function? 

Test for letter or figure 
Floating point number? 
Binary number? 
Hexadecimal number? 

Line address 

Line number/ 

Two-byte number? 
One-byte number? 

Figure? 

"x! 

"g! 

"Real' variable type 

Get number 

‘At 

plus #E41D, addresses of command words 
26 letters 

Table of command words 
Next letter 

Table of BASIC operators 
"Syntax error' 

TAB 

' ' 

Addresses of command words 
A 


B 
C 
D 
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First Publishing 

E425 E 

E427 F 

E429 G 

E42B H 

E42D as 

E42F J 

E431 K 

E433 L 

E435 M 

E437 N 

E439 0 

E43B P 

E43D Q 

E43F R 

E441 S 

E443 T 

E445 U 

E447 V 

E449 W 

E44B xX 

E44D Y 

E44F Z 

kkk*k*K*k Table of BASIC commands 
KkaKKKK Letter Z 
E451 DA ZONE 
KkKKKKK Letter Y 
E456 48 YPOS 
kkk KKK Letter xX 
E45B 47 XPOS 
E45F FD XOR 
kKkK KKK Letter WwW 
E463 D9 WRITE 
E468 D8 WINDOW 
E46E D7 WIDTH 
E473 D6 WHILE 
E478 D5 WEND 
E47C D4 WAIT 
xxkkKkKkK*K = TLetter V 
E481 7F VPOS 
E485 1D VAL 
RKEKEK Letter U 
E489 ED USING 
E48E 1C UPPERS 
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E494 
RK KKK 
E498 
E49C 
E4Al 
E4A4 
E4A7 
E4AB 
E4B0 
E4B4 
E4B7 
E4BD 
E4C0 
ok kk kk 
E4C4 
E4CA 
E4CE 
E4D5 
E4D9 
E4DD 
E4E1 
E4E3 
E4E6 
E4EB 
E4EE 
E4F3 
E4F9 
E4FC 
E4FF 
kkk 
E504 
E507 
E50C 
ESOF 
E515 
E51B 
E521 
E528 
E52D 
E533 
E536 
E53D 
E541 


1B 


UNT 


Letter T 


D3 
D2 
EC 
46 
EB 
7D 
LC 
1A 
D1 
DO 
EA 


TRON 
TROFF 
TO 
TIME 
THEN 
TESTR 
TEST 
TAN 
TAGOFF 
TAG 
TAB 


Letter S 


CF 
E7 
7B 
19 
CE 
E6 
18 
aby) 
CD 
ES 
16 
ce 
15 
14 
CB 


SYMBOL 
SWAP 
STRINGS 
STRS$ 
STOP 
STEP 
SQR 

SQ 
SPEED 
SPC 
SPACES 
SOUND 
SIN 
SGN 
SAVE 


Letter R 


CA 
7A 
45 
79 
C9 
c8 
C7 
C6 
3 
C5 
C4 
C3 
C2 


RUN 
ROUND 
RND 
RIGHTS 
RETURN 
RESUME 
RESTORE 
RENUM 
REMAIN 
REM 
RELEASE 
READ 
RANDOMIZE 
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First Publishing 

E549 C1 RAD 
aKKKKKK Letter Q 
xkkkKkK*k =6TLetter P 
E54F BF PRINT 
E554 78 POS 
E557 BE POKE 
E55B BD PLOTR 
E560 BC PLOT 
E564 44 PI 
E566 BB PEN 
E569 12 PEEK 
E56D BA PAPER 
xxkkxkxk*k = €6Letter 0 
E573 B9 OUT 
E576 B8 ORIGIN 
E57C FC OR 
E57E B7 OPENOUT 
E585 B6 OPENIN 
E58B B5 ON SQ 
E598 B4 ON ERROR GOTO 0 
E5A0 B3 ON BREAK 
E5A8 B2 ON 
xxkkk*k Letter N 
E5AB FE NOT 
ES5AE Bl NEW 
E5B1 BO NEXT 
kaAkkKKK ©60Letter M 
E5B6 AF MOVER 
ES5BB AE MOVE 
ESBF AD MODE 
E5C3 FB MOD 
E5C6 77 MIN 
E5C9 AC MIDS 
E5CD AB MERGE 
E5D2 AA MEMORY 
E5D8 76 MAX 
E5DB DF MASK 
kxxkkkK*K =€6Letter L 
E5E0 11 LOWERS 
E5E6 10 LOG10 
E5EB OF LOG 
ESEE A9 LOCATE 
E5F4 A8 LOAD 
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First Publishing 

E5F8 A7 LIST 
E5FC A6 LINE 
E600 A5 LET 
E603 OE LEN 
E606 75 LEFTS 
xxkxk*k*k © ©6oLetter K 
E60C A4 KEY 
xkkkKkK*KK ©6Letter J 
E610 OD JOY 
kkekek Letter I 
E614 oc INT 
E617 74 INSTR 
E61C A3 INPUT 
E621 OB INP 
E624 43 INKEYS 
E62A OA INKEY 
E62F A2 INK 
E632 Al IF 
xkekkee =Letter H 
E635 42 HIMEM 
E63A 73 HEXS 
xkkkkkKkK © ©6Letter G 
E63F DE GRAPHICS 
E647 AO GO TO 
E64C 9F GO SUB 
eeeKEKK © ©6Letter F 
E653 09 FRE 
E656 EQ FRAME 
E65B 9E FOR 
E65E E4 FN 
E660 08 FIX 
E663 DD FILL 
kkkkkKK Letter E 
E668 07 EXP 
E66B 9D EVERY 
E670 9C ERROR 
E675 41 ERR 
E678 E3 ERL 
E67B 9B ERASE 
E680 40 EOF 
E683 9A ENV 
E686 99 ENT 
E689 98 ENT 
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First Publishing 

E689 98 END 
E68C 97 ELSE 
E690 DC EI 
E692 96 EDIT 
KkxKKK «6Letter D 
E697 95 DRAWR 
E69C 94 DRAW 
E6A0 93 DIM 
E6A3 DB DI 
E6A5 49 DERR 
E6A9 92 DELETE 
E6AF 91 DEG 
E6B2 90 DEFSTR 
E6B8 8F DEFREAL 
E6BF 8E DEFINT 
E6C5 8D DEF 
E6C8 72 DECS 
E6CC 8C DATA 
kxxkkK*K «Letter C 
E6D1 El CURSOR 
E6D7 06 CREAL 
E6D7 05 COS 
E6DF 7E COPYCHRS 
E6E7 8B CONT 
E6EB 8A CLS 
E6EE 89 CLOSEOUT 
E6F6 88 CLOSEIN 
E6FD 87 CLG 
E700 86 CLEAR 
E705 04 CINT 
E709 03 CHRS 
E70D 85 CHAIN 
E7E12 84 CAT 
E715 83 CALL 
RAKE “Letter 'B 
E71A 82 BORDER 
E720 71 BINS 
RARE, “LECeer “A 
E725 81 AUTO 
E729 02 ATN 
E72C 01 ASC 
E72F FA AND 
E732 80 AFTER 
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E737 
KKK KK 
E73B 
E73D 
E740 
E743 
E747 
E749 
E74D 
E751 
E755 
E757 
E759 
E75B 
E75D 
E75F 
E761 
E763 
KR KK 
E766 
E767 
E76D 
E770 
E77D 
Kk KK 
E78B 
E78E 
E790 
E791 
E793 
E79F 
E7A2 
E7A6 
KKK K 
E7F3 
E7F6 
E802 
E805 
E80A 
E87F 
KAR KK 
E82C 
E82E 


00 ABS 

BASIC operators and corresponding tokens 
1 aad 

F9 'Backslash' 


FO '>='t 
FO '=>! 
EE '>'! 
F2 '<>! 
F3 "<=! 
F3 '=<!' 
EF '=! 
Fi. '<' 
F7 Um a 
Or 
F6 t*t 
F5 wet 
F4 '+! 
co ree 


Reset program pointer 


Start of program 

Three times zero to end of program 
End of program 

Use line number 

Replace line addresses by line numbers 
Get next element of line 

End of statement? 


Yes 

‘Line address'? 
No 

Line number to DE 
Use 


‘Line numbers' 
BASIC command DELETE 


End of statement, otherwise 'Syntax error' 
To READY mode 

Get line number range 

Search for BASIC line DE 

Search for BASIC line DE 

Get line address 


Number or address to DE 
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E830 
E832 
E834 
E836 
E83A 
E83D 
E840 
E845 
E848 
E849 
E84C 
E854 
E859 
E85B 
KKKKKK 
E861 
E865 
E868 
E869 
E86E 
E872 
E873 
E878 
E87C 
E882 
E883 
E884 
E885 
KKKKKK 
E887 
E88B 
E88D 
E891 
E893 
E896 
E89A 
E89F 
E8A0 
E8Al1 
KkKKKKK 
E8A3 
E8A6 
E8AA 


‘Line address'? 

Yes 

‘Line number'? 

"Syntax error' 

Get line numbers to HL 

Comparison HL <> DE 

Less than, search as from start of program 
Ignore rest of line 

As from address (HL) 

Search for BASIC line DE 

Not found, search as from start of program 
‘Line address' 

Into program 

Line address into program 

Search for BASIC line DE 


Output error message 
‘Line does not exist' 
Start of program 

Line length to DC 

End of program? 

Not found 

Line numbers to HL 
Comparison HL <> DE 
Greater than, not found 
Equal, found 

Add line length 

Continue search 

Search for BASIC line DE 
Start of program 

Save line address 

Line length to BC 

End of program? 

yes 

Line number to HL 
Comparison HL <> DE 
Current line number greater or equal? 
Add line length 

Continue search 

BASIC command RENUM 

10, default for initial value 
Get line number to DE 

0, default 
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E8AD 
E8BO 
E8B4 
E8B7 
E8BD 
E8C6 
E8CB 
E8DO 
E8D3 
E8F2 
E967 
E974 
E980 
E984 
E98D 
E991 
E995 
E999 
E9A1 


KKK KKK 


E9A8 


KKKKKK 


E9AC 
ka KKK 
E9B2 
E9C2 
E9D1 
E9EC 
E9SFA 
E9FD 
EA02 
EA02 
EA12 
EA16 
EA1A 
EAI1E 
EA25 
EA27 
kk KR RR 
EA7D 
EA80 
EA8 4 
EA86 


Comma following? 

Get line number to DE 
10, default 

Comma following? 

End of line, otherwise, 'Syntax error' 
Search for BASIC line DE 
Search for BASIC line DE 
Comparison HL <> DE 
‘Improper argument' 
‘Improper argument' 

‘IF! 

‘ELSE' 

1 

I Oe 

SE 

ba 

sa fe 

LS Ya 

‘Syntax error' 

BASIC command DATA 


BASIC commands REM and ' 
BASIC command ELSE 


Start of program 
Jump to (BC) 
Output error message 
‘ELSE' 

‘THEN' 

Ignore blanks 
twee 

as 

i a ve | 

"REM! 

Function 

cnet 


BASIC command RUN 

End of statement? 

Start of program as fault 
Yes 

Line number? 
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EA88 
EA8A 
EA94 
EA9A 
EA9F 
EAB7 
KeKKKKK 
EABA 
EAC2 
EACC 
EAD6 
EAD9 
EAE7 
EAEA 
EAED 
EAF 1 
EAF 6 
EAF 9 
EAFD 
kk KKK 
EBO2 
EBO4 
EBO7 
EBOD 
EB10 
EB13 
EB16 
EB18 
EB1C 
EBI1F 
EB21 
EB24 
EB25 
EB2A 
EB30 
EB3D 
EB3E 
EB42 
EB4C 
KKKKKK 
EB59 
EBSC 
EBSF 


Yes 

Line address? 

MC BOOT PROGRAM 
Start of program 
Get line address 
To interpreter 
BASIC command LOAD 


To READY mode 

DISK IN DIRECT 

Get name, open file 

File type 

Comma following? 

Yes, get 16-bit value 

As start address 

End of statement, otherwise 'Syntax error' 
Start address 

DISK IN DIRECT 

DISK IN CLOSE 

BASIC command CHAIN 

"MERGE! 

Flag for MERGE 

Ignore blank 

Default value zero for starting line 
Comma following? 

No 


' ' 
’ 


Get 16-bit value 

Comma following? 

No 

Test for following character 

'DELETE' 

Delete line range 

End of statement, otherwise 'Syntax error' 
Garbage collection 

Get starting line 

Program start as default 

No starting line 

Flag for MERGE 

BASIC command MERGE 

Get name, open file 

End of statement, otherwise 'Syntax error' 
Reset variables 
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EB62 
EB65 
EB71 
EB75 
EB79 
EB7D 
EBAS 
EBBA 
EBCD 
EBE 9 
EBF1 
EBFD 
EBFF 
ECO1 
ECO5 
ECO9 
ECOE 
EC14 
EC1B 
EC24 
EC2A 
EC32 
EC4B 
EC67 
EC6E 
EC70 
EC72 
EC75 
EC77 
EC79 
EC7D 
EC80 
EC87 
EC89 
ECA2 
ECA5S 
ECA8 
ECAA 
ECAF 
ECB2 
ECD8 
ECDC 
ECDE 


Test file type 

To READY mode 

End of program 
Start of program 
End of program 

BD := HL - DE 
Comparison HL <> DE 
End of program 
Comparison HL <> DE 
End of program 

End of program 
"Memory full' 
Output error message 
DISK IN CHAR 

CTRL Z 

Diskette error 
Diskette error 

‘EOF met' 

Output error message 
End of program 

End of program 

End of program 

End of program 


File type 
ASCII file? 
No 

File type 
ASCII file 
Yes 


Reset bit 0 (protected file) 
Output error message 

'File type error' 

Start of program 

Comparison HL <> DE 

End of program 

File type 

Test bit 0 

Set flag for protected file 
DISK IN DIRECT 

‘EOF met' 

‘Direct command found' 
'Overflow' 

Output error message 
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kKkKKKK 


ECE1 
ECE4 
ECEC 
ECE9 
ECEC 
ECEE 
ECF1 
ECF4 
ECF5 
ECF7 
ECFB 
ECFE 
EDO1 
EDO2 
EDOS5S 
EDO6 
EDO8 
EDOB 
EDOE 
kK KKK 
ED11 
ED13 
ED1E 
ED23 
ED27 
kk KKK 
ED30 
ED33 
ED36 
ED37 
ED3A 
ED3D 
ED3E 
ED41 
ED44 
ED47 
ED48 
ED4B 
ED4D 
ED4E 
ED4F 
ED50 


BASIC command SAVE 


OPENOUT 

File type 0, BASIC program 
Comma following? 

No 

Test for following character 
Normal variable 

Variable name 

Convert lower case into capitals 
‘Syntax error' 

Base address of table 
Search table 

Address from table on stack 
Ignore blanks 

Number of entries 

Not found, ‘Syntax error' 
"At 

'B! 

‘pt 

SAVE, P 

File type 1, protected 

End of statement, otherwise 'Syntax error' 
Start of program 

End of program 

HL := HL - DE 

SAVE, D 

Tést: for *;.* 

Get 16-bit value 

SAVE 

Test for ',' 

Get 16-bit value 

SAVE 

Comma following? 

0, default for entrance 
Yes, get 16-bit value 

SAVE 

End of statement, otherwise 'Syntax error' 
File type 2, binary 
Entrance 

End address 

Start address 

DISK OUT DIRECT 
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ED53 
ED56 
KKK KKK 
ED58 
ED5C 
ED5E 
ED62 
ED65 
ED68 
ED6C 
ED6F 
ED79 
ED7E 
ED82 
ED87 
ED8A 
ED9IA 
EDA3 
EDBO 
EDB2 
EDB5 
EDBC 
EDC1 
EDCE 
EDD5 
EDEF 
EDF2 
EDFF 
EEO3 
EEO7 
EEOA 
EE14 
EE18 
EE1A 
EE1D 
EE10 
EE24 
EE28 
EE2E 
EE33 
EE47 
EE52 
EE55 


Interrupt by 'ESC' 

CLOSEOUT 

SAVE, A 

End of statement, otherwise ‘Syntax error' 
9 

Output on channel 9, diskette 
1. to 

65535 

List lines 

Output again to default 
CLOSEOUT 

Delete blank, TAB and LF 

Yet 

Test for numeric 

Type to integer 

Delete variable 

"gE! 

Create integer in HL 

' ' 

Delete blank, TAB and LF 

Test for figure 

' ' 

Type to integer 

' ' 

Type to Real 

Test for string 

No 

4-byte integer*256 to floating point 
Multiply number by 10°*A 

Set variable type to floating point 
Copy variable from (DE) to (HL) 
Delete blank, TAB and LF 

-1 

0 

ey 

Delete blank, TAB and LF 

Test for figure 

Convert lower case to capitals 
oO" 

Ue a 

Delete blank, TAB and LF 

Test for figure 


343 


First Publishing Anatomy of the CPC's 


EE60 
EE6B 
EE99 
EECO 
EEC4 
EEDA 
EEED 
EEF 0 
EEF 3 
EEF5 
EEF 9 
EEFB 
EFOO 
EFO5 
EF08 
EF12 
EF1C 
EF1D 
kK KK 
EF31 
EF32 
EF33 
EF36 
EF38 
EF 3B 
EF3E 
EF40 
EF42 
EF45 
EF47 
kK KKK 
EF49 
EF4C 
KAA KKK 
EF4F 
EF51 
EF61 
EF 62 
EF 68 
EF98 
FO2F 
F034 
F0O3D 


Set type to Real 

100 

Ignore blank, TAB and LF 

Time 10 

Plus next digit 

Create integer in HL 

Ignore blank, TAB and LF 
Convert lower case into capitals 
Base 2, binary 

> a 

Base 16, hex 

"Hh! 

Ignore blank, TAB and LF 

Base 10, decimal 

Convert (Hex) figures to binary 
Convert (Hex) figures to binary 
Base of number system 

Unsigned integer multiplication 
Convert (Hex) figures to binary 
Get character 

Increment pointer 

Test for figure 


yes 

Convert lower case into capitals 
‘At 

Less than 'A', error 

"A'-('9'41) 

9! 

No error 


Reset carry 

Output integer HL 
Convert integer to ASCII 
Output string 

Convert integer to ASCII 


Create integer in HL 


Zero 
Convert number into formatted sring 
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ST 


F047 Le 
FO4C “OLS 
FO4F 10 
F053 ON ek 
F079 er 
F099 "0% 
FOA8 on 
FOB1 pile 
FOCO HQ 
F0C3 'O' 
FODA NOS 
FOE8 'O' 
F128 ee 
F135 "Oi 
F146 KO 
F156 Maye 
F162 roby 
F166 ey 
F181 xs 
F185 een 
FICE vO} 
F1DE LOM 


keke BASIC function PEEK 

F20D UNT 

F210 READ RAM, LD A, (HL) 

F211 Convert accumulator contents to integer 
xkk*k*kk BASIC command POKE 

F214 Get 16-bit address 

F218 Test comma and get 8-bit value 
F21C Write value in address 

xkkkK* BASTC function INT 

F21E CINT 

F221 Port address to BC 

F223 Read port 


F225 Convert accumulator contents to integer 
kkk*k*K* BASTC command OUT 
F228 Get address and value 


F22B Output 
xkkk*kkKk BASIC command WAIT 


F22E Get address and value 
F231 8-bit value to D 

F232 3rd. parameter zero 
F234 Get any third parameter 
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F237 
F238 
F23B 
F23C 
KaKKKKK 
F23F 
F243 
F244 
F247 
KKKKKK 
F24A 
F24C 
F24F 
F252 
F254 
F256 
F257 
F258 
F259 
F25B 
F25D 
F260 
KKK KKK 
F261 
F264 
F266 
F26B 
F26E 
F272 
F274 
F277 
F27A 
F27E 
F26F 
F281 
F284 
F289 
F28E 
F290 
F293 
F297 
F29A 


KRKKKKK 


Third parameter to E 

Read port 

Link up 

and wait 

Get 16-bit and 8-bit values 
Get 16-bit value 

To BC 

Test. for *,;" 

And get 8-bit value 

Command extension 

Increment program pointer 
Zero byte following? 

yes, KL find command 
Command address to DE 

Not found, ‘unknown command' 
Get character 

Ignore command word 

Bit 7 set? 

No, read on 

To CALL command 

Output error message 
‘Unknown command' 

BASIC command CALL 

Get 16-bit value 

#FF = RAM selected 

Address to #AE55 
Configuration byte to #AE57 
Rescue stack pointer 
Maximum 32 parameters 

Comma following? 

No 

Get expression 

And address on stack 

Next parameter 

End of statement, otherwise 'Syntax error' 
Rescue HL 

Number of parameters in accumulator 
Address of parameter block to IX 
Execute routine 

Stack pointer back 
Initialise descriptor stack 
HL back 

BASIC command ZONE 
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F2A2 
F2A5 
KKK KKK 
F2A9 
F2AC 
F2AF 
F2B2 
F2B8 
F2BB 
F2BF 
F2C2 
F2C5 
F2C8 
F2C9 
F2CB 
F2CE 
F2D1 
F2D4 
F2D5 
Kok KR KK 
F2D7 
F2DC 
F2DF 
F2E1 
F2E4 
F2E7 
F2E9 
F2EC 
F2F0 
F2F3 
LOG10 
ES5EB 
ESEE 
ESF4 
ESF8 
ESFC 


Get 8-bit value not equal to zero 
As tab width 

BASIC command PRINT 
Channel number 

End of statement? 

Yes, output LF 

'USING' 

Base address of table 
Search table 

JP (DE), Execute function 
End of statement? 

No, continue 

Number of table entries 


Return address if not found 


' ' 
, 


*SPC' 
'TAB' 


'.t 
’ 


Ignore blanks 

PRINT 

Get expression 

Test for string 

yes 

Convert number to ASCII string 
Get string parameter 
Add ' ' blank characters 
Get string descriptor 
Increase length 

Get string descriptor 
Length 


OF LOG 
A9 LOCATE 
A8 LOAD 
A7 LIST 
A6é LINE 


E600 <AALLOT-V 


F2FF 
F302 
F30F 
Kk RR KK 
F31E 
F321 


Control character? 
Select output stream 
PRINT, 

Ignore blankz 

Tab width 
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KkeKKKK 


F339 


KkKKKKK 


F342 
KKKKKK 
F362 
F365 
F368 
F36B 
kKkKRKKK 
F383 
F386 
F389 
F38C 
F392 
F3A9 
F3AC 
F3B4 
F3D7 
F3F4 
F3F6 
F3F9 
F3FF 
F404 
F408 
F413 
F417 
F436 
F443 
F446 
kK RK 
F44D 
F454 
F460 
F464 
F47A 
F47C 
F489 
F49C 
F4B0 
F4B8 
F4BC 
F4C0 


PRINT SPC 

Get 8-bit value in brackets 
PRINT TAB 

Get 8-bit value in brackets 
Get 8-bit value in brackets 
Ignore blanks 

Test for '(' 

Get 8-bit value 

Test. for. ')' 

PRINT USING 

Ignore blanks 

Get string expression 

Test for following character 
'.t 

Get expression 

End of statement? 

Yes 

Get expression 

‘Underline' 

ve. 

Ignore blanks 

Test for ',' 

'g! 

ae A 

'Backslash' 

'Backslash' 

' ' 

Test for formatting character 
Format number 

Output string 

Test for formatting character 


o4t 
‘gt 
t*t 
ier 
tS: 
‘Improper argument' 
tye 


' ' 
4 
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F4D0 
F4D6 
F4F9 
F4FD 
F507 
KKK KK 
F50D 
F510 
F513 
F516 
F51B 
F51E 
F520 
F523 
F528 
F52A 
F52D 
F530 
F532 
F537 
F53D 
F53F 
F542 
KKK KKK 
F544 
F547 
F54A 
F54B 
F54E 
F541 
F555 
F558 
F55D 
RR KK 
F570 
F577 
kok Rk 
F58F 
FSF7 
kK KK 
FSFD 
F5FF 
F603 


‘ge 
tat 
an | 
oy 
ws 
BASIC command WRITE 


End of statement 

yes 

Get expression 

Test for string 

yes 

Convert number to ASCII 
And output 

Output 

twee 

Output string 

Output 

twee 

End of statement? 
Output 

' ' 

Continue 

Configure memory 
Storage space from DE to HL 
Comparison HL with BC 
Highest address < #AC00? 
HIMEM 

End of string 

End of free RAM 

Start of free RAM 

Plus 303 

Gives program start 
BASIC command MEMORY 
Get 16-bit value 
Comparison HL <> DE 


TXT GET M TABLE 
Comparison HL <> DE 
Calculate length of string range 


Start of string 
End of string 
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F606 
kKkKKKKK 
F60C 
F610 
F618 
F61C 
F61F 
F623 
F626 
F62A 
F633 
F63E 
F645 
RK KKK 
F652 
F655 
F658 
F65A 
F65D 
F65F 
F660 
KaKKKKK 
F665 
F669 
F671 
KkKKKK 
F675 
F67A 
F67E 
F683 
F686 
F689 
F68C 
F68F 
F672 
kKaKRKKK 
F696 
F69C 
F6A4 
F6AE 
Fe6D1 
F6B2 
F6BF 


BC := HL - DE 

Increment program and variable pointer by BC 
End of program 

End of program 

Start of variable 

Start of variable 

Start of array 

Start of array 

End of array 

End of array 

End of program 

End of program 

BC := HL - DE 

Initialise BASIC stack 

Start of stack 

BASIC stack pointer 

For one byte 

Reserve place on BASIC stack 
Zero on stack 

Increment stack pointer 

And save 

Release place on BASIC stack 
Stack pointer 

Deduct accumulator contents 
Save new value of BASIC stack pointer 
Reserve place on BASIC stack 
BASIC stack pointer 

Add accumulator contents 
BASIC stack pointer 

Gives plus #4F94 overflow? 
Then stack pointer is >#BO06C 
Initialise BASIC stack 
"Memory full' 

End of string 

Start of string 

Reserve place for string 


Start of string 
Comparison HL <> DE 
Output error message 
"String space full' 
Start of string 

End of program 
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F6D2 
F6EA 
F6F9 
FO6FE 
F705 
F70C 
F717 
KKK KKK 
F784 
F788 
F70C 
F78F 
F792 
F796 
F79B 
F79F 
F7A2 
F7A5 
F7A8 
F7A9 
F7AB 
F7AD 
kkk kkk 
F7B1 
F7B4 
F7B8 
F7BB 
F7BE 
F7C2 
F7C6 
F7D3 
F7DD 
F7E0 
F7FD 
F805 
F815 
F818 
F803 
F83E 
F884 
F851 
F857 
F85B 


Comparison HL <> DE 
Block transfer LDDR 
BC := HL - DE 

Block transfer LDIR 
BC := HL - D 

Start of string 
Start of string 
BASIC command SYMBOL 
'AFTER' 

Get 8-bit value 

Test. for. ',.* 

8 values 

Comma following? 
Yes, get 8-bit value 
8 arguments already? 
TXT GET MATRIX 
Matrix not in RAM, 'Improper argument' 
8 

Plus matrix address 
Byte from stack 

In matrix table 

Next byte 

SYMBOL AFTER 

Ignore blanks 

Get sign integer value 
256 

Comparison HL <> DE 
‘Improper argument' 
TXT GET M TABLE 
Matrix not yet defined? 
‘Improper argument' 
256 

TXT SET M TABLE 
"Memory full' 

TXT SET M TABLE 
Comparison HL <> DE 
‘Memory full' 

End of string 

Block transfer LDDR 
Start of string 
Block transfer LDIR 
End of string 

Start of string 
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F855 
F868 
F875 
F878 
KKK KK 
F879 
F87E 
F888 
F89F 
F8AD 
F8DE 
F8C2 
F8C6 
F8CA 
ARK KKK 
F8D0 
F8D3 
F8D4 
F8D5 
F8D6 
F8D9 


KKKKKK 


F8EC 
Pe es 
F8F1 
F8F4 
F8F7 
Kk RR 
F8FA 
F915 
KK KK 
F91D 
F921 
F922 
F923 
F925 
F928 


KaKKKKK 


F964 
KR KR 
F969 
F96D 
F975 


End of program 
Comparison HL <> DE 
Output error message 
"Memory full' 

Read string 


twee 

Ignore blanks 

Mee 

JP (DE) 

' ' 

TAB 

CR 

LF 

Output string 

Get string parameter 
Blank string? 

Get character 

Increment pointer 

Output character 

Next character 

BASIC function LOWRS 
Convert capitals into lower case 
Convert capitals into lower case 
TA 

'Zl'4+] 

"qa't-'a! 

BASIC function UPPERS 
Convert lower case into capitals 
Jump to (BC) 

String addition 

Pointer to second string 
Add 

length 

No overflow 

Output error message 
‘String too long' 

BASIC function BINS 


BASIC function HEX$ 


Get expression 
Comma following? 
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F978 
F979 
F97C 
F97E 
F982 
F98A 
KKK RRR 
F98F 
F992 
F995 
F998 
F99B 
F99F 
F9A0 
F9A4 
F9AS 
F9AB 
F9AE 
F9B3 
F9B7 
F9OBA 
KKK KKK 
F9BC 
F9BD 
F9C1 
F9C3 
F9C4 
F9C5 
F9C6 
F9C7 
F9CA 
F9CB 


KakKKKK 


F9D3 
KR RK 
F9D8 
F9DB 
F9DC 
KR RK 
F9E2 
F9E5 
F9E8 
F9EB 


0 as default 

Yes, get 8-bit value 

Greater than, equal to 17? 
Yes, ‘Improper argument' 
Test for ')' 

Convert number to string 
BASIC function DEC$ 

Get expression 

Test for ',' 

Place on BASIC stack 

Get string expression and parameter 
Test for ')' 

Length 

Release place in BASIC stack 
Length 

Adopt variable 

Check for formatting character 
‘Improper argument' 
‘Improper argument' 

Format number 

Adopt string 

BASIC function STR$ 


Convert number to string 
Counter for string length to -1 
Zero 

Increment counter 

End of string? 

Increment pointer 

No, next character 

String length 

Reserve place, provide string descriptor 
BASIC function LEFTS 

Get string and 8-bit value 
BASIC function WRITES 

Get string and 8-bit value 
String length 

Minus parameter 

BASIC function MID$ 

Test for '(' 

Get string and 8-bit value 
Zero, ‘Improper argument' 

255 
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F9EC 
F9ED 
F9FO 
kk RK 
FAO7 
FAOA 
FAOD 
FA19 
FA1C 
FA1D 
FALE 
FA21 
FA24 
FA28 
FA3E 
FA43 
KKK RR 
FA4F 
FA52 
FA56 
FA5S9 
Kok RK 
FA69 
FA6C 
kok ak 
FA6E 
FA71 
kok kk 
FA74 
FA77 
FATA 
FA7TC 
kk RK 
FATE 
FA81 
FA83 
FA85 
FA87 
FA89 
FA8B 
kkk RK 
FA8D 
FA91 


As default 

Get third argument 

Test for ')' 

BASIC command MID$ 

Test for '(' 

Get variable 

String type, otherwise type 'mismatch' 
‘Improper argument' 

255 

As default 

Get third argument 

Test for ')' 

Test for ‘=! 

Get string expression and parameter 
Block transfer LDIR 

Get string expression 

Get third argument for MID$ 
Default 255 

so) 

Test for ',' 

Get 8-bit value 

BASIC function LEN 

Get string parameter, length to A 
Convert accumulator contents to integer 
BASIC function ASC 

ASCII code of first character 
Convert accumulator contents to integer 
BASIC function CHR$ 

CINT, <256 

ASCII code in accumulator 

Length 1 

Provide string with length A 
BASIC function INKEYS$ 

KM READ CHR 

No key depressed? 

"ESC! 

Blank string 

'ESC' 

Blank string 

Adopt character in string 

BASIC function STRINGS 

Get 8-bit value, length 

Test for ',' 
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FA94 
FA97 
FA9F 
FAA1 
FAA4 
FAA6 
FAA9 
FAAB 
KR KKK 
FAAD 
FABO 
kK KKK 
FABE 
FAC1 
FACE 
FAFS5 
FAD8 
FAE2 
kK RR 
FAES 
FAE8 
FAEB 
FAED 
FAEF 
FAF3 
FAF7 
FAFA 
FAFD 
FBO5 
FBO8 
FB48 
FB65 
FB68 
FB6D 
FB70 
FB9E 
FBA1 
FBA4 
FBA8 
FBAD 
FBB1 
FBC4 


kKaeRKKK 


Get expression 

Test for ')' 

Provide string with length A 
Test for string 

No 

Get string parameter 

Blank string, ‘Improper argument' 
Get ASCII code 

BASIC function SPACES 


BASIC function VAL 

Get string parameter 
Convert accumulator contents to integer 
Convert string to number 
Output error message 

'Type mismatch' 

‘Improper argument' 

BASIC function INSTR 

Get expression 

Test for string 

Default start position 1 
Yes 

CINT, <256 

‘Improper argument' 
Test..for "5:5 

Get string expression 

Test for ',' 

Get string expression and parameter 
Test for ')' 

Convert accumulator contents to integer 
Start of string 

Comparison HL <> DC 

End of string 

Comparison HL <> BC 

Start of program 

Comparison HL <> DE 

End of string 

Comparison HL <> DE 

End of program 

Comparison HL <> DE 

Block transfer LDIR 
Initialise descriptor stack 
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FBCC 
FBCF 
FBD7 
FBD9 
FBDC 
FBE2 
FBES 
FBE8 
FBEA 
FBFO 
FBF 6 
FCOA 
FC10 
FC1B 
FC27 
Ak kk 
FC53 
FC56 
FCSB 
FC5E 
KKK KKK 
FC64 
FC7C 
FC87 
FC8B 
FCA9 
FCAF 
FCB3 
FCB7 
FCBC 
FCCO 
FCD9 
FCE6 
FCF3 
FDO3 
kk KR KK 
FDOC 
FDOF 
FD11 
FD14 
FD17 
FD1A 
FD1D 


Pointer on descriptor stack for strings 
String 

As variable type 

Pointer on descriptor stack 

String descriptor 

Comparison HL <> DE 

‘String expression too complex' 

Output error message 

Pointer on descriptor stack 

String type, otherwise, 'Type mismatch' 
Start of string 

Comparison HL <> DE 

Start of string 

Comparison HL <> DE 

BASIC function FRE 

Test for string 

No 

Garbage collection 

Calculate free storage space 

Garbage collection 


Comparison HL <> DE 

End of string 

Start of string 
Comparison HL <> BC 

Start of string 

BC := HL - DE 

Comparison HL <> DE 

Block transfer LDDR 

Start of string 
Comparison HL <> DE 
Comparison HL <> DE 

Get numeric results 

UNT 

BASIC operator '+' 

Test type of operand 
Floating point? 

Integer addition HL := HL + DE 
No overflow, create result in HL 
Convert to floating point 
Floating point addition 
No overflow, ok 
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FD1E 
KR KK 
FD21 
FD24 
FD26 
FD29 
FD2C 
FD2F 
FD32 
FD33 
KK KK 
FD35 
FD38 
FD3A 
FD3D 
FD40 
FD43 
FD46 
FD47 
Kok RK 
FD49 
FD4C 
FD4F 
kkk KK 
FD52 
FD57 
FD5B 
FD5E 
FD60 
FD61 
FC64 
Kk Kk 
FD67 
FD6B 
FD6E 
FD71 
KKK KK 
FD79 
FD7D 
FD80 
FD83 
FD86 


aKakRkKKK 


'Overflow' 

BASIC operator '-' 

Test type of operand 

Floating point? 

Integer subtraction HL := DE - HL 
No overflow, creat result in HL 
Convert to floating point 
Floating point subtraction 

No overflow, ok 

'Overflow' 

BASIC operator '*' 

Test type of operand 

Floating point? 

Signed integer multiplication 
No overflow, adopt result in HL 
Convert to floating point 
Floating point multiplication 
No overflow, ok 

'Overflow' 

Arithmetic comparison 

Test type of operand 

integer comparison 

Floating point comparison 

BASIC operator '/' 


Floating point division 

5 bytes 

Carry result 

ok? 

"Division by zero' 
"Overflow' ; 
BASIC operator 'Backslash' 


Signed integer division 
Create result in HL 
"Division by zero' 
BASIC operator 'MOD' 


MOD calculation 
Create result in HL 
Output error message 
"Division by zero' 
BASIC operator 'AND' 


357 


First Publishing Anatomy of the CPC's 





FD87 

FD8C HL := HL AND DE 
FD8F Adopt integer HL 
x*k*kxk*k* BASIC operator 'OR' 
FD92 

FD97 HL := HL OR DE 

FD9A Adopt integer HL 
x*xkxkx*k*k BASIC operator 'XOR' 


FDIC 

FDA1 HL := HL XOR DE 
FDA4 Adopt integer HL 
xxxk*k*k* BASIC operator 'NOT' 
FDA6 CINT 

FDAC Complement HL 

FDAE Adopt integer HL 
x*k*kk*k* BASIC function ABS 
FDBO SGN 


FDB3 Plus sign, finished 
xxkkkk* Reverse sign 


FDB4 Get numeric result 

FDB7 Sign change floating 

FDBA Sign change integer 

FDBD Store result 

FDCO Overflow, convert number to floating point 
xkxkx*k** ©6©Define sign 

FDC4 


FDC6 SGN 
xxkkkk*k «Define sign 


FDCC Get numeric result 

FDCF Integer SGN 

FDD2 SGN 

*x*k*** = Round number 

FDD5 

FDD7 Adopt variable type and value 
FDDD Get numeric result 

FDDE Rounding places 

FDDF Floating point value? 

FDE2 Rounding after point? Finished 
FDE3 Convert integer to floating point 
FDE6 Round number 

FDE ( CINT 

FDEC Rounding places 

FEED Not equal to zero, then round 
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FDEF 
FDF2 
FDF6 
FDF7 
FDFA 
FEO2 
FEO5 
FEO6 
FEO7 


aKkKKKKK 


FEOE 
kok Kk 
FE13 
FE16 
FE19 
FEA1 
FE1E 
FE25 
FE29 
FE2D 
FE34 
FE38 
FE3C 
FE3E 
FE40 
FE43 
FE45 
FE4D 
FE50 
FE52 
FE58 
FESD 
FE68 
FE6D 
FE70 
FE73 
FE74 
FE76 
Kok KR RR 
FE78 
FE7B 
FE7E 
FE81 


Convert floating point to integer 
Execute function 

Rounding places 

Multiply floating point number by 10%°A 
Convert floating point to integer 
Convert integer to floating point 
Invert rounding places 
Corresponds to division 

Multiply floating point number by 10°A 
BASIC function FIX 

FIX function 

BASIC function INT 

INT function 

Get numeric result 

Integer? 

JP (DE), execute function 
Variable type 

Variable type to C, pointer to HL 
Convert integer to floating point 
String? 

If positive, adopt sign of B 
Creat result in HL 

String? 

Yes, 'Type mismatch' 

Variable type 

String? 

Yes, 'Type mismatch' 

Variable type 

SAVE 

Convert integer to floating point 
Convert integer to floating point 
Pointer to variable 

Variable 

'Type mismatch' 

Compare 

Variable type 

Integer? 

No 

Integer operands to floating point 
Convert 

First operand 

Convert 

BASIC stack pointer, second operand 
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FE84 


kak KKK 


FE8D 
kK KKK 
FE95 
FE98 
FE9E 
FEA2 
KKKKKK 
FEA5 
FEA9 
FEAC 
FEAF 
FEB1 
FEB3 
KKKKKK 
FEB6 
FEBA 
FEBF 
FECC 
FECE 
FED1 
FED2 
FED5 
FED9 
FEDD 
FEE1 


KkKKKKK 


FEE6 
KKK KKK 
FEEB 
FEEE 
FEEF 
FEF2 
FEF5 
FEF 8 
FEFB 
FEFE 
FFO2 
FFOS5 
FF06 
FFOF 
FF11 


To DE 

Convert integer to floating point 
Number to DE 

Convert integer to floating point 
Variable type 

To 'Real' 

Negative, then integer sign change 
Convert integer to floating point 
Convert 4-byte number to floating point 
Lo word 

Hi word 

Variable type 

‘Real' 

Pointer to 4-byte value 

Convert number to floating point 
BASIC function CINT 


‘Overflow' 

Result 

‘Overflow' 

Pointer to variable type 
Load variable type 

Type to integer 

Compare with string 

'Type mismatch' 

Convert floating point number to integer 
Convert sign B to integer HL 
Integer value (HL) to HL 


BASIC function UNT 

Get numeric result 

Integer? 

Convert floating point to integer 
‘Overflow' 

Convert sign B to integer 

Create integer in HL 

Output error message 

‘Overflow' 

Compare 

Variable type 

Different? 

CINT 

String type, otherwise 'Type mismatch' 
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KkKKKKK 


FF14 
FF17 


KkKKKK 


FF1B 


KakKKKKK 


FF2A 
Kok RR Ke 
FF32 
FF33 
kk 
FF35 
FF38 
FF3A 
KK RK 
FF3E 
FF41 
KOK KK 
FF45 
FF48 
FF49 


KkKkKKKK 


FF4B 
ok kk 
FF4F 
FF52 
FF54 
FF56 
FF59 
FF5A 
FF5E 
FF61 
FF62 
FF65 
KR RK 
FF66 
FF69 
FF6C 
FFO6F 
KR KK 
FF74 
FF76 
FF79 


BASIC function CREAL 

Get numeric result 
Integer, then convert 

Set floating value to zero 


BASIC function SGN 

SGN 

Convert accumulator contents to integer 
Lo byte 

Reset Hi byte 

Create integer in HL 

Save value 

Type to integer 

And save 

Variable type to floating point 
Pointer to floating point number 
Type to Real 

Get variable type, HL pointer to variable 
Pointer to variable 

Type to C 

HL points to variable 

Get variable type 

Variable type in accumulator 

Get numeric result 

Variable type 

String? 

Yes, 'Type mismatch' 

Load integer value 

No floating point, finished 
Address of floating point number 
Test for string 

Yes, ok 

Output error message 

‘Type mismatch' 

Test for string 

Variable type 

String? 

Set variable type 

Address to DE 

Place event on BASIC stack 


Variable type 
Equal to stack requirement 
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FF7A 
FF7D 
KKKKKK 
FF83 
FF84 
FF88 
FF8B 
FF8C 
FF8E 
KakRKKK 
FF92 
FF9S 
FF99 
KKK KKK 
FF9C 
FF OF 
FFAO 
FFA4 
FFA8 
KAKKKKK 
FFAB 
FFAE 
FFB1 
KKK KK 
FFB4 
FFB6 
FFB8 
FFBA 
FFBB 
FFBC 
FFBD 
FFBF 
FFC1 
FFC5 
KKK KKK 
FFCA 
FFCC 
FFCE 
FFD2 
FFD4 
KKK KKK 
FFD8 
FFD9 


Reserve place on BASIC stack 
Place result on stack 

Copy variable to (HL) 
Destination address to DE 

Source address 

Variable type 

Equal to shift register 

Reset Hi byte 

Shift 

Test for letters 

Convert lower case into capitals 
‘At 

Zt+1 

Test for alphanumeric characters 
Test for letter 

Yes 

ea 

"QO! 

"QO'47] 

Convert lower case into capitals 
"a! 

"Z'41 

"a't-'at 

Search following table 


Load table length 

Return address for negative search 
Pointer to next table element 
Compare character 

Increment pointer 

Found? 

Table not yet finished? 

Load return address 

Address to HL 

Search memory range (HL) 


A toc 

Zero 

Equal to original accumulator 
Set carry 

Comparison HL <> DE 


BSD 
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FFDB 
KKK KKK 
FFDE 
FFDF 
FFE1 
KKK RRR 
FFE4 
FFE6 
FFE9 
eee ss 
FFEC 
FFED 
FFFO 
FFF1 
FFF2 
kk RR 
FFF5 
FFF 6 
FFF7 
FFF8 


KKKKKK 


FFFB 
kk KK 


FFFC 


KKK KKK 


FFFE 


L-E 
Comparison HL <> BC 


H - 8B 

1 eC} 

BC := HL - DE 
HL := HL - DE 
BC := HL 


Block transfer LDIR, number in A 
Number to C 

Hi byte to zero 

Counter BC = 0? 

Yes, then finished 

Block transfer 

Block transfer LDDR 


Counter BC = 0? 
Yes, then finished 
Block transfer 
Jump to (HL) 

Jump to (BC) 


Jump to (DE) 
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4. APPENDIX 


365 


First Publishing Anatomy of the CPC's 





4.1 The Operating System Routines 


Here, we have listed the routines and tables of the operating system, when we 
know them. 


Important: never try to start the routines using the addresses given here if 
you are not familiar with the method for switching the memory 
configuration. 


Use the vectors described in Chapter 2.1 instead. 


The main aim of this list is to give you a quick overview of the operating 
system. Consequently, only the operating system routines of the CPC 6128 
(see Chapter 2.5) have been reproduced here. The corresponding list for the 
CPC 464 and CPC664 can be obtained by slightly displacing a number of 
addresses. 


KERNEL 

0000 RST O RESET ENTRY 

0008 RST 1 LOW JUMP 

0010 RST 2 SIDE CALL 

0018 RST 3 FAR CALL 

0020 RST 4 RAM LAM 

0028 RST 5 FIRM JUMP 

0030 RST 6 USER RESTART 

0038 RST 7 INTERRUPT ENTRY 
0040 Up to here copied to RAM 
0044 Restore high kernel jumps 
0O05C KL CHOKE OFF 

0099 KL TIME PLEASE 

00A3 KL TIME SET 

OOB1 Scan events 

0153 Kick event 

0163 KL NEW FRAME FLY 

O16A KL ADD FRAME FLY 

0170 KL DEL FRAME FLY 

0176 KL NEW FAST TICKER 


017D KL ADD FAST TICKER 
0183 KL DEL FAST TICKER 
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0189 
01B3 
01C5 
01D2 
01E2 
0219 
0227 
022E 
0255 
0276 
0284 
028D 
0294 
029A 
02A0 
02B1 
0326 
0330 
0389 
0388 
0397 
03C7 
03E7 
041E 
042A 
0430 
045F 
0467 
046D 
04BD 
04C3 
04DB 
04F7 
O4FE 
0505 
050C 
0516 
O51F 
0524 
0552 
0543 
0547 
054D 


Process ticker chain 

KL ADD TICKER 

KL DEL TICKER 

KL INIT EVENT 

KL EVENT 

KL DO SYNC 

KL SYNC RESET 

Add sync event 

KL NEXT SYNC 

KL DONE SYNC 

KL DEL SYNCHRONOUS 

KL DISARM EVENT 

KL EVENT DISABLE 

KL EVENT ENABLE 

KL LOG EXT 

KL FIND COMMAND 

KL ROM WALK 

KL INIT BACK 

Add event 

Delete event 

KL SET RAM CONFIGURATION 
KL POLL SYNCHRONOUS 

RST 7 INTERRUPT ENTRY CONT'D 
KL EXT INTERRUPT ENTRY 
KL LOW PCHL CONT'D 

RST 1 LOW JUMP CONT'D 

KL FAR PCHL CONT'D 

KL FAR ICALL CONT'D 

RST 3 LOW FAR CALL CONT'D 
KL SIDE PCHL CONT'D 

RST 2 LOW SIDE CALL CONT'D 
RST 5 FIRM JUMP CONT'D 
KL L ROM ENABLE CONT'D 
KL L ROM DISABLE CONT'D 
KL U ROM ENABLE CONT'D 
KL U ROM DISABLE CONT'D 
KL ROM RESTORE CONT'D 

KL ROM SELECT CONT'D 

KL PROBE ROM CONT'D 

KL ROM DESELECT CONT'D 
KL CURR SELECTION CONT'D 
KL LDIR CONT'D 

KL LDDR CONT'D 
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0553 
056C 
057D 


MACHINE 


0591 
05C5 
O05D5 
OS5SED 
061C 
0677 
0688 
O6FC 
0705 
0738 
0776 
0786 
078C 
O7AA 
07B4 
07C0 
07E0 
O7F7 
080C 
081B 
0835 
0844 
0858 
0863 
0883 


KL ROM OFF & CONFIG. SAVE 
RST 4 RAM LAM CONT'D 
KL RAM LAM (IX) 


PACK 


Reset cont'd 

60Hz table 

50Hz table 

MC BOOT PROGRAM 
MC START PROGRAM 
Cold start 
Power-up display 
Output message 
Load error message 
Firm names 

MC SET MODE 

MC CLEAR INKS 

MC SET INKS 
Output colour 

MC WAIT FLYBACK 
MC SCREEN OFFSET 
MC RESET PRINTER 
Convert umlauts 
MC CHARACTER ASSIGNMENT 
MC PRINT CHAR 

MC WAIT PRINTER 
MC SEND PRINTER 
MC BUSY PRINTER 
MC SOUND REGISTER 
Scan keyboard 


JUMP RESTORE 


O8BD 
O8DE 
OA72 
OAB4 


JUMP RESTORE 

Main jump address 

BASIC jump addr. 

Move (h1+3) to ((h1+1)),cnt=(h1) 


SCREEN PACK 


OABF 
OADO 


SCR INITIALISE 
SCR RESET 
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OAE9 
OBOC 
0B17 
0B37 
OB3C 
OB45 
OB56 
OB5D 
OB6A 
OBAF 
0c05 
0c1l1 
OC1F 
0C39 
0c55 
0C71 
0C74 
OC7A 
OC7F 
0c85 
OC8A 
OC8E 
OCA7 
OCD8 
OCEA 
OCEE 
OCF2 
OCF7 
OCF8 
0D10 
0D1” 

OD1: 

0D20 
0D35 
0OD61 
0D73 
0D87 
OD99 
ODB9 
ODBD 
ODES 
ODF8 
OE00 


SCR SET MODE 

SCR GET MODE 

SCR CLEAR 

SCR SET OFFSET 

SCR SET BASE 

SCR CHANGE SCREEN START 
SCR GET LOCATION 

SCR CHAR LIMITS 

SCR CHAR POSITION 

SCR DOT POSITION 

SCR NEXT BYTE 

SCR PREV BYTE 

SCR NEXT LINE 

SCR PREV LINE 

SCR ACCESS 

SCR WRITE 

SCR PIXELS 

XOR Mode 

AND Mode 

OR MODE 

SCR READ 

SCR INK ENCODE 

SCR INK DECODE 

Reset colours 

SCR SET FLASHING 

SCR GET FLASHING 

SCR SET INK 

SCR SET BORDER 

Set colour 

Get colour matrix entry 
SCR GET INK 

SCR GET BORDER 

Get colour 

Get ink address 

Set inks on frame fly 
Flash inks 

Get param's for curr. colour set 
Colour matrix 

SCR FILL BOX 

SCR FLOOD BOX 

SCR CHAR INVERT 
Address colour memory 
SCR HW ROLL 
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0E44 
OEF9 
OF2A 
OF 93 
OF 9B 
1052 


TEXT 


1074 
1084 
109F 
10E4 
1103 
111E 
1126 
1139 
115A 
1165 
1170 
117C 
1186 
1193 
11A4 
11CA 
11D6 
1208 
1252 
125F 
1265 
1276 
127E 
1286 
1288 
1297 
1299 
12A6 
12BA 
12BA 
12C0 
12C6 
12D4 
12F2 


SCR SW ROLL 
SCR UNPACK 

SCR REPACK 

SCR HORIZONTAL 
SCR VERTICAL 
Default colours 


SCREEN 


TXT INITIALISE 

TXT RESET 

Reset param's (all windows) 
TXT STR SELECT 

TXT SWAP STREAMS 

ldir cnt=15 

Addr. window param's to de 
Set default param's 

TXT SET COLUMN 

TXT SET ROW 

TXT SET CURSOR 

TXT GET:- CURSOR 

Curr. window top, left + hl 
Curr. window top, left - hl 
Move cursor 

TXT VALIDATE 

hl inside window limits 
TXT WIN ENABLE 

TXT GET WINDOW 

TXT DRAW/UNDRAW CURSOR 

TXT PLACE/REMOVE CURSOR 
TXT CUR ON 

TXT CUR OFF 

TXT CUR ENABLE 

Cur enable cont'd 

TXT CUR DISABLE 

Cur disable cont'd 

TXT SET PEN 

TXT SET PAPER 

TXT GET PEN 

TXT GET PAPER 

TXT INVERSE 

TXT GET MATRIX 

TXT SET MATRIX 
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12FE TXT SET M TABLE 
132B TXT GET M TABLE 
1335 TXT WR CHAR 
134B TXT WRITE CHAR 
137B TXT SET BACK 
1388 TXT GET BACK 
13A8 TXT SET GRAPHIC 
13AC TXT RD CHAR 
13BE TXT UNWRITE CHAR 
13FE TXT OUTPUT 

140A TXT OUT ACTION 


1452 TXT VDU DISABLE 

1459 TXT VDU ENABLE 

1460 CURR. CURSOR FLAG TO ACCUM. 

1464 Copy default control character jumps 
1474 Default control character jumps 

14D4 TXT GET CONTROLS 


14E1 Bell 
14EC Transparent mode on/off 


14F1 INK command 
14FA BORDER command 
1501 Define window 


150D SYMBOL command 

1519 CRSR Left 

151E CRSR Right 

1523 CRSR Down 

1528 CRSR Up 

1539 CRSR Home 

153F CRSR at start of line 

1547 LOCATE command 

154F TXT CLEAR WINDOW 

155E Delete character at CRSR pos. 
1565 Delete window from CRSR pos. 
1578 Delete window up to CRSR pos. 
158F Delete line from CRSR pos. 
1599 Delete line up to CRSR pos. 


GRAPHICS SCREEN 
15A8 GRA INITIALISE 
15D7 GRA RESET 


15EC NN 
15FB GRA MOVE RELATIVE 
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15FE 
1606 
160E 
161¢C 
1624 
1627 
162A 
165D 
16A5 
16EA 
1717 
172D 
1736 
1767 
176E 
1775 
177A 
1780 
1783 
1786 
1794 
1797 
179A 
17A6 
17A9 
17AC 
17B0O 
17B4 
1940 
19D5 
19D9 


GRA MOVE ABSOLUTE 

GRA ASK CURSOR 

GRA SET ORIGIN 

GRA GET ORIGIN 

Get phys. start position 
Get phys. destination position + set cur. 
CONVERT GRA COORD. 
Add. curr. coord. + rel. coord. 
GRA WIN WIDTH 

GRA WIN HEIGHT 

GRA GET W WIDTH 

GRA GET W HEIGHT 

GRA CLEAR WINDOW 

GRA SET PEN 

GRA SET PAPER 

GRA GET PEN 

GRA GET PAPER 

GRA PLOT RELATIVE 

GRA PLOT ABSOLUTE 

GRA PLOT 

GRA TEST RELATIVE 

GRA TEST ABSOLUTE 

GRA TEST 

GRA LINE RELATIVE 

GRA LINE ABSOLUTE 

GRA RESCUE MASK PARAM 
GRA RESCUE MASK PARAM 
GRA LINE 

GRA WR CHAR 

GRA RESCUE PARAM 

GRA FILL 


KEYBOARD MANAGER 


1B5C 
1B98 
1BBF 
1BC5 
1BFA 
1c04 
1COA 
1C3C 
1046 


KM INITIALISE 

KM RESET 

KM WAIT CHAR 

KM READ CHAR 

KM CHAR RETURN 

KM EXP BUFFER 

Exp. buffer cont'd 
Default exp. string 
KM SET EXPAND 
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1C6A 
1CA7 
1CB3 
1CC3 
1CDB 
1CE1 
1D38 
1D3C 
1D40 
1DB8 
1DE5 
1DF2 
1DF6 
1DFA 
1E0B 
1E19 
1E2F 
1E34 
1E45 
1E55 
1E6D 
1EC4 
1EC9 
1ECE 
1ED1 
1ED8 
1EDD 
1EE2 
1EE5 
1EEF 
1F3F 
1F8F 


Clear exp. buffer 

Is there place for new exp. string? 
KM GET EXPAND 

Address exp. string after de 
KM WAIT KEY 

KM READ KEY 

KM GET STATE 

Set state 

KM UPDATE KEY STATE MAP 
KM TEST BREAK 

KM GET JOYSTICK 

KM GET DELAY 

KM SET DELAY 

KM ARM BREAK 

KM DISARM BREAK 

KM BREAK EVENT 

KM GET REPEAT 

KM SET REPEAT 

KM TEST KEY 

Get bit corresponding to key # 
Bit masks 

KM GET TRANSALTE 

KM GET SHIFT 

KM GET CONTROL 

Get key table 

KM SET TRANSLATE 

KM SET SHIFT 

KM SET CONTROL 

Set key table 

Key translation table 
Key SHIFT table 

Key CTRL table 


SOUND MANAGER 


1FE9 
2050 
206B 
208B 
20D7 
2114 
21AC 
21CE 


SOUND RESET 

SOUND HOLD 

SOUND CONTINUE 
Sound event 

Scan sound queues 
SOUND QUEUE 

SOUND RELEASE 
SOUND CHECK 
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21EB SOUND ARM EVENT 


23DB Set volume 

2495 SOUND AMPL ENVELOPE 

249A SOUND TONE ENVELOPE 

249D Copy envelope 

2406 SOUND A ADDRESS 

24AB SOUND T ADDRESS 

24AE Get envelope address 


CASSETTE MANAGER 


24BC CAS INITIALISE 
24CE CAS SET SPEED 
24E1 CAS NOISY 

24E5 CAS IN OPEN 


24FE CAS OUT OPEN 
2502 Cass. open 

2550 CAS IN CLOSE 
2557 CAS IN ABANDON 
257F CAS OUT CLOSE 
2599 CAS OUT ABANDON 
25A0 CAS IN CHAR 


25C6 CAS OUT CHAR 

25F6 Check input buffer status 
25F9 Check buffer status 

2603 CAS TEST EOF 

2607 CAS RETURN 


2618 CAS IN DIRECT 
2653 CAS OUT DIRECT 
2692 CAS CATALOG 

26AC Read file header 


2891 Output cass. message (# in b) 

28F0 Output cass. message (1 character) 
2935 Cassette messages 

29A6 CAS READ 


29AF CAS WRITE 
29C1 CAS CHECK 


29E3 Motor on & open keyb. 

2B3D Cass. input RD DATA & test ESC 
2BA7 Cass. output WR DATA 

2BBB CAS START MOTOR 

2BBF CAS STOP MOTOR 


2BC1 CAS RESTORE MOTOR 
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SCREEN EDITOR 


2C02 EDIT 

2C42 EDIT Execute jump 

2C72 EDIT jump table 1 

2CAE EDIT jump table 2 

2CBD CRSR UP 

2CC1 CRSR DWN 

2CC5 CRSR RGHT 

2CC9 CRSR LEFT 

2CD0 ESC 

2CEA BREAK message 

2CF1 ENTER 

2CF2 BELL 

2D02 CRSR RGHT (buffer) 

2D0A CRSR DWN (buffer) 

2D14 CTRL & CRSR RGHT 

2D1D CTRL & CRSR DWN 

2D34 CRSR LEFT (buffer) 

2D3C CRSR UP (buffer) 

2D45 CTRL & CRSR LEFT 

2D4F CTRL & CRSR UP 

2D81 CTRL & TAB (Filp insert) 

2D8A Add character 

2DC3 DEL 

2DCD CLR 

2E17 SHFT & CRSR RGHT 

2E1C SHFT & CRSR LEFT 

2E21 SHFT & CRSR UP 

2E26 SHFT & CRSR DWN 

2E65 COPY 

2F56 Sign from keyboard 

ARITHMETIC 

2F73 FLO PI 

2F91 FLO COPY VARIABLE FROM (DE) TO (HL) 
2F9F FLO INTEGER TO FLOATING POINT 
2FC8 FLO 4-BYTE VALUE TO FLOATING POINT 
2FD1 FLO 4-BYTE VALUE 256 TIMES TO INTEGER 
2FD9 FLO FLOATING POINT TO INTEGER 
3001 FLO FLOATING POINT TO INTEGER 
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3014 FLO FIX 

3055 FLO INT 

305F FLO 

30C6 FLO MULTIPLY NUMBER BY 10%A 
3136 FLO RND INIT 

3143 FLO SET RANDOM SEED 
3159 FLO RND 

3188 FLO GET LAST RND VALUE 
31B1 FLO LOG10 

31B6 FLO LOG 

322F FLO EXP 

32AC FLO SQR 

32AF FLO EXPONENTIATION 
3345 FLO DEG/RAD 

3349 FLO COS 

3353 FLO SIN 

33C8 FLO TAN 

33D8 FLO ATN 

349E FLO SUBTRACTION 
34A2 FLO ADDITION 

3577 FLO MULTIPLICATION 
3604 FLO DIVISION 

36DF FLO COMPARISON 

3727 FLO SGN 

3731 FLO SIGN CHANGE 


CHARACTERS 


3800-3FFF CHARACTERS 
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4.2 System RAM References 


Below, you will find cross references for each RAM address where 
occurring in the operating system. This is very helpful if you manipulate the 
contents of the RAM addresses with your own programs and suddenly find a 
value you had not expected. 


Here too, we have confined ourselves to the CPC 6128. 


B100: 0638 

B101: 0638 

B114: 2DA5 2DBB 2DDE 2DEA 

B115: 2C24 2D81 2D85 2D8D 

B116: 2DF3 2DFA 2E13 2E41 2EC1 
B117: 2DF6 

B118: 24E1 2807 28D2 

B119: 280C 290F 

B11A: 24E5 2550 2557 25F6 2692 26E0 271B 292F 
B11B: 263C 269C 26EF 

B11D: 25BC 25C1l 260F 2613 26F2 
B11F: 2743 274E 2760 

B1l2F: 26FC 

B130: 26AC 

B131: 24FA 

B132: 25AA 25B5 25B9 2608 260C 2629 263F 270C 
B134: 24F2 261F 2626 26DD 

B136: 2706 

B137: 24F6 

B1I5F: 24FE 257F 2599 25CA 2656 27D9 
B160: 266E 2685 279E 

B162: 25EA 25EF 27Al1 

B164: 2790 27A8 


B174: 27CD 
B175: 258B 27BF 
B176: 2663 


B177: 25D4 25E3 25E7 2671 267E 27B6 27CA 
B179: 27A4 

B17B: 2796 27D2 

B17C: 2666 

B17E: 266A 

B1A4: 26BB 274B 2763 2B04 
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B1B5: 2700 

B1B7: 26D9 2709 

B1B9: 2022 2072 2094 20BE 2122 214D 21B9 
B1BB: 273D 

B1BC: 21D1 

BIBE: 20E9 2637 

B1D5: 21EF 

B1E4: 2564 27E5 

B1E5: 29E3 2ACD 2AE3 
B1E6: 2AC6 2B23 

B1E7: 24DC 

B1E8: 2B78 2B8B 

B1E9: 24D9 

B1EA: 2B7C 

B1EB: 2B00 2B12 2B16 
B1ED: 1FE9 206B 

B1EE: 2050 208D 20B7 20D7 2258 2286 
B1FO: 201D 20D1 210C 2147 21B4 
B1F8: 2000 2296 

B237: 229E 22C0 

B276: 22A6 22B8 

B2A6: 2303 2495 24A6 
B2B5: 1FFD 23EF 

B396: 249A 24AB 

B590: 1B9E 

B5D6: 1B6E 

B628: 1BCF 1BF0 

B629: 1C€38 

B62A: 1BC6 1BFA 

B62B: 1C17 1CC9 

B62D: 1C13 

B62F: 1C€35 1C96 1CAl1 1CA7 
B630: 1CAC 

B631: 1B68 1D12 1D28 1D38 1D3C 
B632: 1CFB 

B633: 1D9E 1DF2 1DF6 
B634: 1DD8 

B635: 1B8A 1D57 1D86 1E4D 
B637: 1D4F 1E46 

B63B: 1DE5 

B63D: 1DB8 

B63E: 1DE8 

B63F: 1B8D 1D43 
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B649: 1D40 1D54 

B64B: 1D49 

B653: 1D7A 1D92 1DA1 

B654: 1D7F 1DAC 

B655: 1B63 

B656: 1E0OD 1E19 

B657: 1DFD 

B686: 1E76 1E86 1EAE 

B688: 1E97 1E9D 

B68A: 1D96 1E93 1EAA 

B68B: 1EC4 1ED8 

B68D: 1EC9 1EDD 

B68F: 1ECE 1EE2 

B691: 1D8B 1E2F 1E37 

B692: 1B71 

B693: 160E 161C 1640 

B695: 1612 1620 1655 

B697: 15FE 1606 165E 

B699: 1602 160A 1664 

B69B: 166A 16C9 1717 1753 1910 

B69D: 1673 16CD 171B 1906 

B6O9F: 1680 16FB 172D 174A 18B9 1AE8 

B6A1: 1689 16FF 1731 1746 18C3 1B18 

B6A3: OFAS OFAE OFB1 OFFF 101C 176A 1775 178D 19C4 
1B34 

B6A4: OFF3 1027 175D 1771 177A 19CE 

B6A5: 17BD 188F 18C8 18DA 18E6 18EF 18FA 18FF 19D9 
1A19 1A44 1AAC 1AC1 

B6A7: 17CC 1893 18A2 18AD 18B2 1915 1928 1934 19DF 
1A25 1A2C 1A9F 1AA9 

B6A9: 1802 1861 19FE 1A4B 1AC6 

B6AA:  19E6 1B3A 

B6AB: 17EC 1846 1A0B 1A21 1ABD 1AD7 1ADB 1ADF 
B6AC: 1A50 1A79 

B6AD: 17C4 17E8 1812 181B 18D2 18DD 

B6AE: 17D3 17E2 191F 1A5D 1A66 1A94 

B6AF: 17DF 1828 1898 

B6éBO: 17F9 1868 1876 1880 1A76 1A97 

B6B2: 17B0O 17F2 1820 

B6B3: OFA9 OFB4 OFBA 1012 104C 17AC 

B6B4: OFF7 1021 19C9 19D5 

B6B5: 10AF 10B3 10E6 1103 110C 

B6B6: 10Al1 
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B726: 10A4 1135 115F 116A 1176 117C 11A7 11AD 1340 
1555 156F 1582 

B728: 123A 1259 

B729: 1166 1186 1193 11EF 1229 1252 1539 1552 1568 
157B 

B72A: 115B 118C 119B 11DD 11E2 1542 159E 
B72B: 11F7 122C 1255 1558 156B 

B72C: 11D6 11EA 157E 1593 

B72D: 1182 11B2 

B72E: 113C 125F 128E 129F 1336 143B 1460 
B72F: 10CA 10DA 126B 12A6 12BA 12C9 12CF 1392 13A0 
13DB B730: 11BD 12AB 12C0O 13BE 1589 
B731: 1377 1384 1388 

B733: 13A8 140B 

B734: 1321 132B 

B735: 1078 

B736: 1326 1331 

B738: 134F 13C1 13E7 

B758: 1413 144E 1465 

B759: 142C 1446 

B763: 146B 

B73C: OBOC 0B31 

B7C4: OB3C OB51 OB56 OB8A OE2A OE3D 
B765: 0OB20 

B7C6: OAC7 0B37 O0B47 OB59 0B93 OBED 0E32 
B7C7: OC6A 0C71 

B7C8: OC6D 

B7D2: OCEA OCEE 0D95 

B7D3: OD8E 

B7D4: OCDB O0D92 

B7E5: 0OD38 0D87 

B7F6: OCE4 OD7C OD8A 

B7F7: ODOC 0D83 

B7F8: 0OD61 0D73 

B7F9: 0OD42 OD55 

B802: OFA1 OFBD 

B804: 0O7E3 0812 

B82D: 0066 OOF2 011D 0127 

B82E: OQOEC 

B82F: OOF5 OOFE 0102 

B831: OOE2 OOF8 0114 0132 0142 O03FE 
B832: 010A 014E 

B8B4: 0O0O9E OOAC 00B1 010E 
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B8Bé6: 
B8B8: 
B8B9: 
B8BB: 
B8BD: 
B8BF: 
B8CO: 
B8Cl: 
B8C2: 
B8C3: 
B8D3: 
B8D5: 
B8D6: 
B8D7: 
B8D9: 
B8DA: 


009A 
OOA5 
OOBF 
00C7 
OODC 
00D2 
0256 
022A 
0263 
0230 
02Al1 
0399 
0080 
0060 
005D 
034E 


00A8 


016A 
017D 
0189 
03D0 
026E 
03C7 
026B 
02B1 
02A5 


0351 
0086 
0083 


0170 
0183 
O1BF 
0287 
0276 
0307 
02BE 
0484 


0330 


01C5 
03D6 


0294 029A 03E0 


04B5 0539 0543 


04D5 
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4.3. The BASIC Tokens 


00 
01 
02 
03 
04 
OD 
OE 
OF 
10 
11 
12 
13 
14 
15 
16 
17 
19 
1A 
1B 
1c 
1D 
1E 
1F 
80 
81 
82 
83 
84 
85 
86 
87 
88 
89 
8A 
8B 
8C 
8D 
8E 
8F 
90 


Line end 

's', End of statements 
Integer variable '%' 
String variable 

Real variable 


Variable without character 


Constant 0 
Constant 
Constant 
Constant 
Constant 
Constant 
Constant 
Constant 
Constant 
Constant 
One Byte 
Two Byte Word-decimal 
Two Byte Word-binary 
Two Byte Word-hex 
Line address 

Line number 
Floatingpoint 

AFTER 

AUTO 

BORDER 

CALL 

CAT 

CHAIN 

CLEAR 

CLG 

CLOSEIN 

CLOSEOUT 

CLS 

CONT 

DATA 

DEF 

DEFINT 

DEFREAL 

DEFSTR 


WOWDANAHADUPWNHE 


= 
12) 
K 
Q 


382 


93 
94 
95 
96 
97 
98 
99 
9A 
9B 
9C 
9D 
9E 
oF 
AO 
Al 
A2 
A3 
A4 
AS 
A6 
A7 
A8 
AQ 


AC 
AD 


BO 
Bl 
B2 
B3 
B4 
BS 
B6é 
B7 
B8 
B9 
BA 


ON 


DIM 
DRAW 
DRAWR 
EDIT 
ELSE 
END 
ENT 
ENV 
ERASE 
ERROR 
EVERY 
FOR 
GOSUB 
GOTO 
IF 

INK 
INPUT 
KEY 
LET 
LINE 
LIST 
LOAD 
LOCATE 
MEMORY 
MERGE 
MIDS 
MODE 
MOVE 
MOVER 
NEXT 
NEW 

ON 

ON BREAK 
ERROR GOTO 0 
ON SQ 
OPENIN 
OPENOUT 
ORIGIN 
OUT 
PAPER 
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91 DEG BB PEN 
92 DELETE BC PLOT 
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BD PLOTR EA TAB 
BE POKE EB THEN 
BF PRINT EC TO 
co , ED USING 
Cl RAD EE > 
C2 RANDOMIZE EF = 
C3 READ FO >= 
C4 RELEASE Fl < 
C5 REM F2 <> 
C6 RENUM F3 <= 
C7 RESTORE F4 + 
C8 RESUME F5 - 
c9 RETURN F6 * 
CA RUN F7 / 
CB SAVE F8 * 
CC SOUND F9 \ 
CD SPEED FA AND 
CE STOP FB MOD 
CF SYMBOL FC OR 
DO TAG FD XOR 
D1 TAGOFF FE NOT 
D2 TRON FF Function 
D3 TROFF 

D4 WAIT 

D5 WEND 

D6 WHILE 

D7 WIDTH 

D8 WINDOW 

D9 ZONE 

DA WRITE 

DB DI 

DC EI 

DD FILL 

DE GRAPHICS 

DF MASK 

E0 FRAME 

El CURSOR 

E3 ERL 

E4 FN 

E5 SPC 

E6 STEP 

E7 SWAP 
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Token &FF is placed before a function. The following tokens can come after 
it: 


00 ABS 71 BINS 
01 ASC 72 DECS 
02 ATN 73 HEXS 
03 CHRS 74 INSTR 
04 CINT 75 LEFTS 
05 cos 76 MAX 
06 CREAL 77 MIN 
07 EXP 78 POS 
08 FIX 79 RIGHTS 
09 FRE 7A ROUND 
OA INKEY 7B STRINGS 
OB INP 7c TEST 
oc INT 7D TESTR 
OD JOY 7E COPYCHRS 
OE LEN TF VPOS 
OF LOG 

10 LOG10 

i LOWERS 

12 PEEK 

13 REMAIN 

14 SGN 

15 SIN 

16 SPACES 

17 SQ 

18 SQR 

19 STRS 

1A TAN 

1B UNT 

1c UPPERS 

1D VAL 

40 EOF 

41 ERR 

42 HIMEM 

43 INKEYS 

44 PI 

45 RND 

46 TIME 

47 XPOS 

48 YPOS 

49 DERR 
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4.4 Monitor 


We can quite imagine that some of you are impatient to find out what is 
behind the ROM listing which only in fact gives the symbolic contents of the 
operating system. Therefore, unless you already have a monitor a listing is 
given for one at the end of this section. 


With the exception of two small machine routines, one to read a byte from 
the memory and the other to fetch a byte from a file, the program is written 
completely in BASIC. As the entire command set is first of all read into 
arrays, the Disassembler is quite speedy. 


One drawback has to be mentioned: the selected procedure is not capable of 
processing certain commands of the ([X+xx) type. If one is encountered, it is 
indicated in the listing as follows: "!! Special command.....". You will then 
have to interpret the command yourself with the help of the bit pattern. Such 
commands are not common, but are used a few times in the Sound Manager. 


Apart from that, the way the commands are presented does not quite match 
with the Z80 standard. For example, immediate values are identified in our 
list by prefixing them with a hash. Double byte values without one of these 
represent addresses. 


You have the choice of disassembly from RAM, ROM or file. Few programs 
give this last alternative and is very useful for programs not compatible with 
the Basic program in memory. 


Before we describe the commands, just one little tip: to start with, leave out 
lines 20-40 to make sure that a syntax error resulting from a typing mistake 
is not suppressed during the trial run of the program. If you do not intend, in 
any case, to work from a file, these lines can be left out since they only serve 
to prevent the otherwise unavoidable "clearing out" of the memory when a 
file is opened. You should also note that you have to call the program 
"mimo.bas" so that OPENIN actually finds a file. 


Now, about those few commands. Basically, you must bear in mind that any 
parameters have to be entered directly after the command, in hexadecimal 
notation. For example, if you want to set the current address to $0048, you 
have to enter: m48>ENTER<. 


d : disassembly from the current address. This function is interrupted by 
pressing any key. 
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f : f is followed immediately by the full filename that you want to handle. 
With the following entry, you set the relative address at which the file is to 
appear on the screen. This is purely for display purposes. The file itself is 
started right from the beginning in each case. The following display 
instructions then relate to this file. The file mode is interrupted by function 
m. 


i : writes bytes to memory. This command requires no further parameters. 
The bytes are requested one by one from the current address. This function 
is interrupted by a blank entry. 

©: sets up output file. 0 is the usual case and causes all screen displays to be in 
mode 1. 1 gives a screen mode 2 and divides it so that the top third caters for 
the simple storage display, while the rest is allocated to the Disassembler. 
The windows are retained when there is a change-over from display to 
Disassembler and vice versa. Finally, 8 conveys the output to the printer. 

m : sets up the current address to which all the following commands relate. 

b: sets the storage configuration. The composition of the required byte is as 
described elsewhere. For example, FE selects the two built-in ROM's and the 
RAM between them, while FF selects the RAM only. 

$ : converts the decimal parameter into hexadecimal. 


% : converts the hexadecimal parameter (maximum of four places) into a 
decimal number. 


X : terminates the program and resets the memory limit. 
? : causes a warm restart and displays the command menu. 


>ENTER< : when entered alone, lists the memory contents in hexadecimal 
and ASCII form. 


We hope that you will not find it too laborious typing in the following listing. 
Incidentally, a '“' in the listing corresponds to the "upward-pointing" arrow. 
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10 
20 
30 
40 
50 
60 
70 
80 
90 
100 
110 
120 
130 
140 
150 
160 


170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 


300 
310 
320 
330 
340 


350 


360 
370 


top=HIMEM 
ON ERROR GOTO 40 
OPENIN "mimo.bas" 
RESUME NEXT 
MEMORY HIMEM-1 

CLOSEIN 
him=HIMEM-256 

ZONE 8:1f=0 
mpb=him-20:MEMORY mpb-1 

GOSUB 1350:ms=&FE 

CLS: INK 3, 6:b0=1:b1=24:b2=22 :b3=0 

DIM 1%(4,255),mn$ (4,255) ,pu% (15) 

GOSUB 1010:a=0 
bsS$=STRINGS (32,8) :bl1S=SPACES (30) 

IF plf=1 THEN 1f=0:plf=0 

MODE 1:PRINT:PRINT: PRINT"c = Call Machine 
Program" 

PRINT"d = Disassembler" 

PRINT"f = File" 

PRINT"i = Insert Bytes" 

PRINT"o = Output-lf#" 

PRINT"m = Memory Address" 

PRINT"b = Bank-select" 

PRINT"S$ = Decimal -> Hex" 

PRINT"% = Hex -> Decimal" 

PRINT"x = End" 

PRINT"? = Warmstart" 

PRINT:GOTO 290 

IF 1f=0 OR 1f£>7 THEN MODE 1 

BORDER b0O: INK 0550: INK 1,b1:PRINT:PRINT"bank= 
";HEXS (ms,2) :PRINT "mem = "; 

HEXS (a, 4) :i=a:PRINT"1£# =";1£:PRINT 
INPUT">",h$:h1$=LEFTS (h$,1) 

IF h$="?" THEN GOTO 150 

IF h$="x" THEN MEMORY top:MODE 1:END 

IF hl$<>"o0" THEN 370 

1f=VAL (RIGHTS (h$,1)):IF 1f£=0 OR 1f£>7 THEN 
plf=0:GOTO 280 

IF plf=0 THEN MODE 2:WINDOW #0,1,80,25,25:WINDOW 
#1,1,80,1,8: WINDOW #2,1,80,9,25:plf=1 
GOTO 290 

IF hlS="$" THEN PRINT 

HEXS (VAL (RIGHTS (h$,LEN(h$)-1))):GOTO 290 
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380 
390 


400 
410 
420 
430 
440 


450 
460 
470 


480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 


630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 


IF hl$<>"%" THEN 410 

xxX= (VAL ("&"+RIGHTS (h$, LEN(h$)-1))):IF xx<0O THEN 
xxX=xx+65536 

PRINT xx:GOTO 290 

IF hl$<>"m" THEN 460 

IF file=1 THEN file=0:CLOSEIN 

IF LEN(h$)=1 THEN 280 

a=VAL ("&"+RIGHTS (h$, LEN (h$)-1)):IF a<0O THEN 
a=at+65536 

padp=a-1:GOTO 280 

IF hl$<>"b" THEN 490 

re=VAL ("&"+RIGHTS (h$,LEN(h$)-1)):IF re>255 OR 
re<0 THEN PRINT"Request 2-Byte Hex Value":GOTO 280 
ms=re:GOTO 280 

IF hl$<>"f£" THEN 570 

IF file=1 THEN CLOSEIN 

ON ERROR GOTO 530 

OPENIN MIDS (hS, 2) 

RESUME NEXT 

INPUT"basis (hex) ";h$ 


h$="m"+h$ 
file=1:GOTO 440 
REM 


IF hl$="d" THEN i=a:GOTO 810 

IF hl$="c" THEN CALL a:GOTO 280 

IF hlS$="i" THEN 780 

IF LEN(hS$)<2 THEN hS$="00" 

bis=VAL ("&"+RIGHTS (h$)-1)):IF bis<1l THEN 
bis=bist+65536 

IF plf=0 THEN MODE 2 ELSE 1f=1 

BORDER b2:INK 0,b2:INK 1,b3 

ON file GOTO 670 

a=INT (a/16) *16 

FOR i=a TO bis STEP 16 
PRINT#1f£,HEXS(i,4);":";:FOR j=0 TO 15 
pad=i+j:GOSUB 1520:PRINT#1f£," ";HEXS$ (mv, 2); 
NEXT j:PRINT#1f£,TAB(60) ; 

FOR j=0 TO 15:pad=i+j:GOSUB 1520:he=(mv AND 127) 
IF he<32 OR he=127 THEN he=46 
PRINT#1f£,CHRS (he) ;:NEXT j:PRINT#1f£ 

IF INKEYS<>"" THEN a=i:1=65535:ELSE a=it+16 
NEXT 

IF 1f<>8 THEN INPUT "Press >ENTER< when 
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770 
780 
790 
800 
810 
820 
830 


840 
850 


860 
870 
880 
890 
900 
910 
920 


930 
940 
950 
960 
970 
980 
990 


ready"; re$ 


GOTO 280 
i=a 
PRINT HEXS(i,4);: ";:INPUT"",d$:IF dS="" THEN 280 


POKE i, VAL("&"+d$) :i=i+1:GOTO 790 

IF plf=1 THEN 1f=2:PRINT#1f£,CHRS$ (11); 

IF LEN(h$)=1 THEN h$="00" 

bis=VAL ("&"+RIGHTS (h$, LEN(h$)-1)):IF bis<1l THEN 

bis=bis+65536 

pa=a 

PAPER 0:IF INKEYS <>"" THEN a=pa:PRINT#1f£:GOTO 

280 

IF pa>bis THEN a=pa:PRINT#1f£:GOTO 760 

pad=pa:GOSUB 1520:op=mv:ad=pa:pa=patl 

IF 1f=8 THEN PRINT#1f, LEFTS(b1$,10); 

PRINT#1f£,HEX$(ad,4);"  ";:xx=0 

PRINT#1f£,HEXS (op, 2) ; 

se=0:GOSUB 1700:IF LEFTS(mn$,1)="?" THEN 

se=xx:GOSUB 1700:IF mn$=""THEN PAPER 3:PRINT#1f," 
2?2?2?2?": PAPER 0:GOTO 850 

ON 1%(xx,op) GOTO 980,970, 960,950 

ON 1%(xx,op)-1 GOTO 980,970,960, 950 

pad=pa:GOSUB 1520:PRINT#1£,HEXS$ (mv, 2) ; :pa=patl 

pad=pa:GOSUB 1520:PRINT#1f,HEXS (mv, 2) ; :pa=patl 

pad=pa:GOSUB 1520:PRINT#1£,HEXS (mv, 2) ; :pa=pat+l 

PRINT#1f£, LEFTS (b1$, (4-1%(xx,op) ) *2+2) ; 

GOSUB 1090 


1000 GOTO 850 
1010 PRINT:PAPER 3:PRINT"Please Wait";:PAPER 0: 


PRINT:FOR i=0 TO 4: FOR j=0 TO 255 


1020 READ a:1%(i,4j)=a 

1030 NEXT j,i 

1040 FOR i=0 TO 4:FOR j=0 TO 255 

1050 READ mn$:mn$ (i,j) =mn$ 

1060 NEXT:NEXT: RETURN 

1070 xx=1%(0,op) :pad=pa:GOSUB 1520:op=mv:se=xx:GOSUB 


1700:IF mn$="" THEN 920 


1080 PRINT#1£,HEXS (op, 2) ;:pa=pa+1:GOTO 940 
1090 se=xx:GOSUB 1700:1n=LEN(mn$) 

1100 IF mn$=pmn$ THEN PAPER 3 

1110 pmn$=mn$:ppn=1 

1120 IF MIDS (mn$,1n-3,4)="+/-*" THEN 


mn$=LEFTS (mn$,1n-4) :GOTO 1230 
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1130 


1140 


1150 
1160 
1170 
1180 


1190 


1200 


1210 
1220 


1230 
1240 


1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 


1470 


pn=INSTR(mn$,"*"):IF pn<>0Q THEN 
PRINT#1f£,LEFTS$ (mn$,pn-1);:GOTO 1170 
pn=INSTR(ppn,mn$,"*"):IF pn<>0O THEN 
PRINT#1£,MIDS (mn$,ppn,pn-ppn);: GOTO 1220 
PRINT#1f£,mn$; 

PRINT#1f:RETURN 

pad=pa-2:GOSUB 1520:ar=mv:pn=pn+1l 

IF pn>ln THEN xz=ar:PRINT#1f£,HEXS (xz,2) ;:GOTO 
1160 

ppn=pn:IF MID$(mn$,pn,1)<>"*" THEN 
Xz=ar:PRINT#1f£,HEXS (xz,2);:GOTO 1140 
pn=pn+1:pad=pa-1:GOSUB 

1520: yy=256*mv+ar:PRINT#1£, HEXS (yy, 4); 
PRINT#1£,MIDS$ (mn$,pn) : RETURN 
pn=pn+1:pad=pa-1:GOSUB 1520: 
ar=mv:xz=ar:PRINT#1f£,HEXS (xz,2) ;:GOTO 1210 
PRINT#1f£,mn$; 

pn=pn+1:pad=pa-1:GOSUB 1520: ar=mv: 
yy=adt+2+art+(ar>127) *256: PRINT#1f£,HEXS (yy, 4); 
PRINT#1f£:RETURN 


sp=1 

WHILE MIDS (mn$,sp,1)<>" ": sp=sp+1:WEND 
WHILE MIDS (mn$,sp,1)=" ":sp=sp+1:WEND 
ad=cn+VAL (RIGHTS (mn$, LEN (mn$) -sp+1) ) 


ha=INT (ad/256) :la=ad-ha*256 

PRINT#1f£," ($";hex$ (ha, 2) ;HEXS$ (la, 2) ;")":RETURN 
IF MIDS$(mn$,sp,1)="-" THEN 1340 
ad=cnt+tar:GOTO 1300 

ad=cntar-256: GOTO 1300 

POKE mpb, &DF 

po=mpb+4 :ph=INT (po/256) :pl=po-ph*256 
POKE mpb+1,pl1:POKE mpb+2,ph 

POKE mpb+3, &C9 

po=mpb+7 :ph=INT (po/256) :pl=po-ph*256 
POKE mpb+4,pl1:POKE mpb+5,ph 

POKE mpb+7,&3A 

by=mpb+14 :ph=INT (by/256) :pl=by-ph*256 
POKE mpb+10, &32 

POKE mpbt+11,pl:POKE mpb+12,ph 

POKE mpb+13,&C9 

DATA &cl1,&d1, &f1,&el,&f£5, &d5, &c5, &cd, &80, 
&bc, &£5,&d1, &72, &23, &73, &C9 

FOR i=1 TO 16 
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1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
1780 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 


READ a 


mp$=mp$+CHR$ (a) 


NEXT i 
RETURN 


IF pad>65535 THEN RETURN 
ON file GOTO 1600 


IF ms=255 THEN mv=PEEK (pad) : RETURN 


ph=INT (pad/256) :pl=pad-ph*256 
POKE mpb+8,pl:POKE mpb+9,ph 
POKE mpb+6,ms 

CALL mpb 


mv=PEEK (by) :RETURN 


IF padp<pad THEN GOSUB 1630 
mv=pu% (pad MOD (16) ) 

RETURN 

ret%=0 :mpp=@mp$ 

get f£=PEEK (mpp+1) +256*PEEK (mpp+2) 
CALL getf, @ret% 


mv=ret% AND 255: 
padp=padpt+1:pu% (padp MOD (16) )=mv 
IF padp<pad GOTO 1650 


RETURN 
mn$=mn$ (se, op) : 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


1 


PRPORPPRPRPRPEPRPEPEHENNNNNNE 


, 


3 


PRPPPRPPRPPRPPEPPPWHWHWH 


, 


PRPPPPPRPRPPPPPWWWWHRHPHPHE 


IF (ret%® AND &100)=0 THEN mv=0 


RETURN 
Pee ese 
¢: Lgesk 
Poel ines 
pole pod 
pil2ed 
gpd 
pale ppl 
rial 
eg oh 
pe 
pla t 
, l,l 
Pan ger seuay 
np Mads 
Ft sp ok 
pe Linge 
yp Dak 
Peele pds 
pide ge oh 

1. 1 
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1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 
2120 
2130 
2140 
2150 
2160 
2170 
2180 
2190 
2200 
2210 
2220 
2230 
2240 
2250 
2260 
2270 
2280 
2290 
2300 
2310 
2320 
2330 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
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DODD VDDAONNNNDVODVDONODONNNNNNDODVOVDCVOOORPRPRPRPRPRPRPRPRREFR FP 


DODD VDDAONNNNDVODONNNNNNNNDWODDODVDOVOOWWWWWWWWRRP PP 


DODD VOOONNNNOTOCOCOCOS SHH KBBBRODDOODODOORPRPRFRPKHRPNNBWREREHR FPF 
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2340 DATA 0 
2350 DATA 0 
2360 DATA 0 
2370 DATA 0 
2380 DATA 0 
2390 DATA 0 
2400 DATA 0 
2410 DATA 0 
2420 DATA 0 
2430 DATA 0 
2440 DATA 0 
2450 DATA 0 
2460 DATA 0 
2470 DATA 0 
2480 DATA 0 
2490 DATA 3 
2500 DATA 0 
2510 DATA 0 
2520 DATA 0 
2530 DATA 0 
2540 DATA 0 
2550 DATA 0 
2560 DATA 0 
2570 DATA 0 
2580 DATA 0 
2590 DATA 0 
2600 DATA 0 
2610 DATA 0 
2620 DATA 0 
2630 DATA 0 
2640 DATA 0 
2650 DATA 0 
2660 DATA 0 
2670 DATA 0 
2680 DATA 0 
2690 DATA 0 
2700 DATA 0 
2710 DATA 0 
2720 DATA 0 
2730 DATA 0 
2740 DATA 0 
2750 DATA 0 
2760 DATA 0 
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2770 DATA 0 
2780 DATA 0 
2790 DATA 0 
2800 DATA 0 
2810 DATA 3 
2820 DATA 0 
2830 DATA 0 
2840 DATA 0 
2850 DATA 0 
2860 DATA 0 
2870 DATA 0 
2870 DATA 0 
2880 DATA 0 
2890 DATA 0 
2900 DATA 0 
2910 DATA 0 
2920. DATA 0 
2930 DATA 0 
2940 DATA 0 
2950 DATA 0 
2960 DATA 0 
2970 DATA 0 
2980 DATA 0 
2990 DATA 2 
3000 DATA 2 
3010 DATA 2 
3020 DATA 2 
3030 DATA 2 
3040 DATA 2 
3050 DATA 0 
3060 DATA 2 
3070 DATA 2 
3080 DATA 2 
3090 DATA 2 
3100 DATA 2 
3110 DATA 2 
3120 DATA 2 
3130 DATA 2 
3140 DATA 2 
3150 DATA 2 
3160 DATA 2 
3170 DATA 2 
3180 DATA 2 
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3190" DATA. (2° p02 9226 5 62° GY Qo 2 we Dep 2 
3200..DATA: 2 5.°2). 99°25 Bey 2 Ge Qiao Bx 2 

32°10: DATA 22) apt 22 ID OP a Oe te te 

3220 «DATA: 2° ,. 2. 32? 5. 2272) sy) 2g 25. 2 

32:30: DATA: 2° 4° 2) % 24 2g 29 292 yh 2 

3240: (DATA® 20.5202! 4. 2p 2 p25 207 2 2 

3250 DATA: 2° 22-5: (2: 5 2p 2 2. ces s2er 2 

3260 DATA 2, 2.5 -2.,°2) 7 2.4.2 ,-2., 2 

32 70-DATAA2 >. 2. ap. 205 Bo pe Sop. eg 2. 2 

3280 “DATA, 2) 3° 2) pp Zig. (2. Gf 2 2) 2g 2 

3290 DATA. 2° > 2 op 2g 2h gt Qi 2 ape 25 Gp <2 

3300. DATA: 20 gf (2)5 (2B opi ig 2 GQ hee 2 

3310 DATA "nop 1 ae be, #**", "1d 
(bc),a", "ince be", “inc b", "dec 
b", "ld b; : eu "rica " 

3320 DATA "ex af,af'","add hl,bce","ld 
a, (bc) ","dec be",. “inc c", "dec 
ot, "Ld C,#o", “rrca * 

3330 DATA "dijnz Haare Le de, #**", "ld 
(de),a", "ine de", "inc a", "dec 
a","lda a, Fon tra " 

3340 DATA "Jr +/-*","add hl,de","ld 
a, (de)","dec de", “ine e", "dec 
e","ld e,F4", "rra " 

3350 DATA "jr nz,+/-*","ld hl, #**","ld 
ee Wis Seine hi"; “ine h";, "dee i aeage| 

n>"; "daa " 

3360 DATA "jr z,+/-*","add hl; Al", "la 
hi,**", "dec hl; ine 1","dec 1", "ld 

L$"; "Cpl a" 

3370 DATA "jr nc,+/-*","ld sp, #**", "1d 
eA, a, "ine sp", "inc (hl)","dec 
(hl)","1ld (hl), #*","scf * 

3380 DATA "jr co, +/-*";, "add hl,sp","ld 
a,**","dec sp", "inc a", "dec | a","1ld 

aig KO"; NACE ly 

3390 DATA "ld by 6"). ben, Mid 
b, a"; "1d b;.e", “id Dah "ia 
br, cla bp nL) "3 "ra bra" 

3400 DATA "ld C7b" Vid epee", "1d 
epanty ld cye", “id epn;td 
Cli C7 hl) td Cz.a" 

3410 DATA "ld dayb, Va ro Wea oa Lo | 
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d, da", "ld 
d, es "ld 


d, ee", "ld 
d, (hl)","ld 


d, he: "la 
d,a" 


3420 DATA "ld e,b","1d e,c","1d 
6,40", 7 kd e,e", “1d e,h","ld 
e,1","ld e, (hl)", "1d e,a”" 

3430 DATA "ld hb", “ld h,c","ld 
h,a","ld h,e*> "id hah", "1d 
hel; "Ld h, (nly", “lea h,a" 

3440 DATA "ld 1,b", "ld LpCot pid 
1,da","1ld le", ' “1d Ln” ;"id 
1,1","1ld Late ro" ia ipa* 

3450 DATA "ld (hl),b","ld (nl),c","1ld 
(nL). ,a", "Ld (hl),e", “ld (AD): 7h" ia 

(hl),1", "halt "wld (hl),a" 

3460 DATA "ld a,b", "1d a,c", "ld 
aan, id a,e", "ld ah" "1d 
a,1","ld a, (hl) ",; “1a a,a" 

3470 DATA "add a,b","add a,c","add 
a,da","add a,e", "add a,h", "add 
a,1","add a, (hl)","add a,a" 

3480 DATA "","adc a,c",."adc a,da","adc 
a,e","adc a,h", "adc a,1","adc 
a, (hl)","adc a,a" 

3490 DATA "sub a,b", "sub a,c", "sub 
a,da", "sub a,e", "sub a,h", "sub 
a,1","sub a, (hl). sub a,a" 

3500 DATA "sbc a,b","sbc a;zo";"sbe 
a,da","sbec a,e", "sbc a,h","sbec 
ay Sbe a,-(hl)",."sbe a,a" 

3510 DATA "and a,b","and a,c","and 
a,da","and a,e", "and a,h","and 
a,1","and a, (hl)","and a,a" 

3520 DATA "xor a,b","xor a,c","xor 
aan" xOr a,e", “xor a, nn"; "xor 
aj," ,"xor ap (hl) "7" xor a,a" 

3530 DATA "or a;,b",." Or a,c","or 
apa "or a,e", "or a; h", "or 
a,1","or a, (h1)","or a,a" 

3540 DATA "cp a,b"; "ep a;,en,; “ep 
a,da","cp a,e", "cp a,;h", "cp 
a,1","cp ay (hl) "ep a,a" 

3550 DATA "ret nz","pop Boe." Ip nz"; "4p 

xa “eall nz,**","push be", "add 
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3560 


3570 


3580 


3590 


3600 


3610 


3620 


3630 
3640 
3650 
3660 
3670 
3680 
3690 
3700 
3710 


3720 


3730 


3740 


3750 


a, : ue "rst 
DATA "ret 


Zero; Ley as "call 


a, #7", "rst 
DATA "ret 


nc, aan "out 


de", "sub 
DATA "ret 


a, (*) ","call 


3 
DATA "ret 
po, **", "es 
hl","and 
DATA "ret 
pe, **","ex 


a, #O; "rst 


DATA "ret 


Wy "call 


a, HON, "rst 
DATA "ret 
m, RAM Sey 
a, . sour "rst 


DATA. Ui ay tes 
DATA," 7" 
DATA, St ee, 
DATA: tte 
DATA we ww ‘ 
DATA, 80 
DATA ts 
DATA. wet! 
DATA "in 
hl; be™,"td 
east () 
DATA "in 
hi; be?, "ld 
ra" 
DATA "in 
hl,de", "1d 
aja 
DATA "in 
hl,de", "ld 
a,r" 
DATA "in 


oO 


Zuo wreak "jp 
Ziigph ey Meal, 
a 
nce", "pop de™ "1p 
(),8%) eat 
apten, "LSet 2" 
c","exXx ada | 2) 
Cee. WM! She 


po", "pop 
(sp),hl", 
a, OM "rst 
pe", " jp 
de,hl", 
5" 
p"; "pop 
p,**", 
6" 
m", "ld 


“call 


"push 


jo tt ae WD 
"call 
4q" 

(hl) mH "Jp 


at", " jp 


sp,hl", "ID 


eC Call m, **", SS gale 
a 
we we we woe woe woe 
v , , 
woe woe we we we 7 woe 
wow we wee we we we 
v v , Ld 
we we ww woe woe woe 
we wre woe woe we woe 
£ , 
we ww we we we we 
, 
wee " a we we wow . wow 
b, (c)", "out (c),b", 
** be", "neg 
Ow, "la aie a" 
ce, (ey; “out (CS), Cr7 
DC, Aah we "reti 
d, (c)","out (c),a", 
La o = Haan meer eM 
e, (c)","out (c),e", 
Co (aire a aber es 4) 
h, (c)","out (c),h", 
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pe, RAN: 


xAN "adc 


nc, xan "push 


Cc, eA "in 


a, HOM ret 


po, coe "push 


wes ; "xor 


P, xaM "di 


ak, "or 


" cp 


"sbec 


a", “retn 


"adc 
Lay ame io 


"sbc 
1","ld 


"adc 
Ze "ld 


"sbc 
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3760 


3770 


3780 


3790 
3800 
3810 
3820 
3830 


3840 


3850 


3860 


3870 
3880 
3890 
3900 
3910 
3920 
3930 
3940 
3950 
3960 
3970 
3980 
3990 


4000 
4010 
4020 
4030 


4040 
4050 


hl,hl","1ld 
a, (hl)" 
DATA "in 
hl hie id 
a, (nl)" 
DATA "in 
**,sp","", 


eA,hi",, we 
Le (eo)? "OU 
hi,**","", "", 


fe (c) We LS "sbc 


LT 


DATA "in a, (c)","out 

hl; sp", "1d Sp peewee, we 
DATA we ; we wre we we we we we 
DATA we ; we > we ; we 4 wow wre wr > we 
DATA we ; we ‘, we A we we A we ,. we ; we 
DATA we Fs we we we ; ww 5 we we we 


DATA "ldi 
(hl), (c)", 
DATA "ldd 
(hl), (c)", 
DATA "ldir 
(hl), (c)", 
DATA "lddr 
(hl), (c)", 


(de), (hl) ","cpi 
"outi (c), (hl)" 
(de), (hl)","cpd 
"outd (c), (hl)" 
(de), (hl) ","cpir 
Vota (c), (hl)" 
(de), (hl)","cpdr 
"“otdr (c), (hl)” 


DAA gg pe ee PRs ee bee 
DATA we , we > we we A we ww we we 
DAA ee gee ge pe ene 
DAA Sega ge engos re ghen pepe pete upt on 
DAA eg ty Reo hee Pete Pe ee 
DATA EPRP AE Mes SUEEER 5 ARN, 308 ON UIE LSE woe 
DATA we ; ww 5 we : we we we we r ww 
DATA we - we ; we 7 ww ; we we we ww 
DATA we F we , we ; we we we ss ww A we 


DATA 
DATA 
DATA 
DATA 


we ; "add 
" hie "add 
” Bie "ld 


ix, be"; " ee " A 


we we we we we we 
, , , 3 


ix,de", ala 
ix, #**", "1d 


ix) oe 
’ ’ ’ ’ 
DATA "","add nlp eae dabraue Ke | 
we we 


ix", " ee 


we 
, , 


DATA 
(ixt+* 


PLU Ona Ip o Ve: 


)" "1a (ixt+*),#°","" 


DATA "","add ixpepr, *t, 
DATA 80,08 ne eer we 
DATA CUS SEN te ae, wee 
DATA), Oe Lee oe, ee eld 
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" m "rld 


(c),1","adc 
ww i "rld 


hi;-sp";. "1d 


(¢):a",“tade 


a, (hl) ","ini 


we we 
’ 


aj, (n) “ind 


ww oe 
’ ’ , 


we wo 
, wi 


om eee 
’ 


a, (nl) ", "inir 


a, (nl)","indr 


Th ee 
’ , a 


woe 
 é 


wm see ee one 
, ’ 


we tee eee one ae 
, ’ , 


BA. Tt Mane 


ix, AM "dec 


(ix+*) ue "dec 


we wee oe 
, 


b, (Ise) 28" 
Cc, (ixt*)","" 
ro (ixt+%) ir ww 
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4060 
4070 
4080 
4090 


4100 
4110 
4120 
4130 
4140 
4150 
4160 
4170 
4180 
4190 
4200 


4210 
4220 
4230 


4240 
4250 
4260 
4270 
4280 
4290 
4300 
4310 


4320 


4330 


4340 
4350 
4360 
4370 
4380 
4390 
4400 


DATA 
DATA 
DATA 
DATA 


(ix+*),h", 


(ix+* 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
(ixt+* 
DATA 
DATA 
DATA 
(sp), 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
iy", 
DATA 
yey 
DATA 
(iy+* 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


" 


" 


wo wna 
, 

wo owe 

wo oan 
, , 


"1a 
(ixt+*),d", 


er one wes RS 

La es >) 

Ay ee OU Let 
(ixt*) ,b", "1d 


wid 


(ixt*),e", 


e,; (ixtepee 
hy Cite) 
1, (ixt+*)", 

(ixt+*),c" 
"ld 


; "la 


"la CISA) pula ore ie | 
),a 
LESS eA pe we Paul Xo! ai, (ixt*)","" 
woe owe meee see UADes wo ,"add a, (ix+*)","" 
woe owe wn nn nn mm Made ay (ix+*)","" 
wee ospen ower one Mate ew MSU a, (ixtAy ws 
Se ee ee Lee Les rh Yo a, (ix+%)","" 
wee omer oopee omer ie ne MOT a, (ixt*)","" 
wu ovens we ome one Lees obi a; (ix+*)","" 
A ae min. woe ,"cp a, Ge <a ae 
pot Ge ue special commands with 
Yiitsn SESS SEN a we 
we , "pop ix","","ex 
ix", we , "push Taye woe 
wae eam (ix) Dae LL Hasan aN wow 
hae 6 | SD je ete ae ae otis wow 
mu "add iy,be", woe oe i wero owe 
uu "add ly, de", we PLS ees wow 
reales | iy, #**", "1d KO Ay MNS 
mm add iy,iy", "id iy,**", "dec 
woe Wt WD, AS (iyt+*)","dec 
geen Wel (iy+*)", ee 
nv “add ly, sp", ens wom ome oe oe 
wee ome oe sah ati wn ha: b, (iyt+t*)","" 
wee A EL NL nn ig Cc, (Gytty et 
wor owe ET er RODE woe Paulo | d, (ives) en 
woe owe oe Bite See wa ,"ld e, (fy toy en 
we wee Ww seer wou woe wee Past ike h, (iyt+%) mS. woe 
wee ow oe wn wn! we Aah i, Gye 
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4410 DATA "ld (Lyte) 7b", "la (iy+*),c","1ld 
(iy+*),d", "ld (iy+*),e","ld 
(iy+*),h", "1d (div#*) ct ee Nid 
(iy+*),a" 


4420 DATA REN Uo PNM OIE, a a, (iy+*)","" 
4430 DATA LE puna Ru ole a, (yt) 
4440 DATA. **, 9", ON 98 8 ON Pade a, (iy+*)","" 
4450 DATA 0 90 SEONG, AE, SOE HONS IS by as (iy+*)","" 
4460 DATA Lae aR oo) a; (iy+*)","" 
4470 DATA BGT A Ye eh an a, (iy+4)","" 
4480: DATA, 00 fet, i ME ee ee EXO a; (iy+4)","" 
B49 O°. DATA. ee Ne SO ae Or a, (iytsy 
4500 DATA EIEN SSE ONE EEE, SAI OD a, (iy+*)","" 
4510 DATA a ee 

452.0 DATA See et special commands with 


(iyt+*) ae yee ws, ay we 
4530. DATA PE OES SOU SE, MELNE CE CPOE = SAU AE: AUST AN INL CONSE 
4540 DATA a hey esa B ANE FAN NN RP BARS SEE 


4550 DATA " er "pop Ly, ww Las "ex 
(sp) 4 Ly, " aa "push ry"; ww ar ww 
4560 DATA we "mp (iy) Ede eg cprre migteten apie re 
4570 DATA eg Op pC OE Pe pe 
4580 DATA mn whe SD Aly pe pp 
4590 DATA "rlc be .4r ie fonieads ofl Ko! ON ELS 
e","rlc h”,. ‘tric LM ELe (hi). "rte 
a" 
4600 DATA "rrc | oer a (01 COL dan ah a of a Ue rre 
e","rrc ne, Lee E exre (nT). "27re 
a" 
4610 DATA "rl b",%rd Codd ash lB a5 ed: 
e", "rl hn; be call i ye (nL), 22 
“an 
4620 DATA "rr } OLAS a 6 en, "xr (0 baad op of 
en Aer he, we frien os (Chis) 2 rie 
a" 
4630 DATA "sla bb"; "sla c","sla a","sla 
e","sla h", "sla Le ska: (nL); "sla 
a" 
4640 DATA "Sra b","sra ce, “sra: a”, "sra 
e","sra he, -sxa 1, “sra (hl)","sra 
a" 
4650 DATA SE eagle ogee trig tee ge ecipert weagy ee 
4660 DATA "srl b", "srl Ct, srd a’; "sz 
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e", "srl ny Ment in orl (nl) rset 
a W 
4670 DATA "bit 0,5"; “Dit 0:6"; MDL 


4680 


4690 


4700 


4710 


4720 


4730 


4740 


4750 


4760 


4770 


4780 


4790 


4800 


Oa" "bit 
071% "bit 
DATA "bit 
1,da","bit 
LG Lt 
DATA "bit 
2,a","bit 
25 DLE 
DATA "bit 
370", "bit 
3745.7 DLt 
DATA "bit 
4,a","bit 
451"); "bit 
DATA "bit 
57a", "bit 
Sy; BDLE 


DATA "bit 


6:0" hE DLC 
Gee bit 
DATA "bit 
Ta Lt 
Apa Oi ED Be 
DATA "res 
070"; "res 
0;,.1"; "res 
DATA "res 
Lid, "res 
LL, Mees 
DATA "res 
2,a" "Les 
2,1","res 
DATA "res 
3,.a" res 
3,1","res 
DATA "res 
4,da","res 
4,1","res 
DATA "res 
5,da","res 


O,e",. "DLE 
O72, (Rn) Ye bie 
1b"; "bit: 
Len, “bie 
Le (h et baie 
Zi Dey ED Lt 
2,6"; “BL 

2 -(nd) gM DEE 
37D DLE 
33-6"5 “bE 
35 (Al) "DL 
4 DY pebit 
4,e", “bit 
4, (hl)","bit 
5b, "bit 
Ser; MDL 
53 (bl) "Date 
63:5", “bit 
6,e", “bit 
6, (AL) "bit 
7.0" Mbit 
Le; “bit 
Pehl) eV Dae 
0; b" "res 
0,e", "res 
0, (hl)", "res 
1,b","res 
lve, “res 
L(A tres 
27D 4 “LSS. 
2,e";,. “res 
2, (h1l)", "res 
3D", “res 
376", “res 
3, (hl)", "res 
4,b", "res 
4,e", "res 
4, (hl)","res 
O70. Mees 
5,e", "res 
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Opt base 
05a" 
Tier bat 
Lhe bat 
1,a” 
26° "bit 
27h" bLt 
2,a" 
36" s "bit 
3h, Ubi 
3,.an 
4o"> "bit 
4H" "bre 
4,a" 
55:08, “bat 
57h", “bit 
5,a" 
6,0", "bit 
6,h","bit 
6,a" 
Tie pg MDL 
Tn DL 
‘eas 
0,c","res 
0,h", "res 
0,a" 
Lee res 
17h" ;"res 
1a 
26> Yres 
2,.n" "res 

2,a" ‘ 
3,0", "res 
3,h","res 
37a" 
4,c","res 
4,h","res 
4,a" 
57C, LES: 
5, nes "res 
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4810 


4820 


4830 


4840 


4850 


4860 


4870 


4880 


4890 


4900 


5 Lt, @ res 
DATA "res 
6,da","res 
6,.1"., “res 
DATA "res 
Ta" ,“"res 
Tp "res 
DATA "set 
0,da","set 
OO, "set 
DATA "set 
1.a";,:"set 
Lip ty SSE 
DATA "set 
2,0", "set 
2,1","set 
DATA "set 
3,a",;"set 
3,.1";:"set 
DATA "set 
4,qa","set 
4,1","set 
DATA "set 
5,a","set 
Syl", "set 
DATA "set 
6,a","set 
6,1","set 
DATA "Set 
7,a","set 
7,1","set 


5, (nl)", "res 
6,5", "res 
6,6". "res 
6, (nL) " "res 
pd LES 


Te res 
he (hi) "ees 
0, b",."set 

0, ee"; “set 
0, (nl)", "set 
1,b","set 
1,e", "set 
1, (nL) "set 
2,5" ,"Set 
2,e", "set 
2,(h1)","set 
3,b5",.“set 
3,e", "set 
3, (hl)","set 
4,b","set 
4,e", "set 
4, (h1l)","set 
5,;b";, "set 
5,e", "set 

5S (nly "set 
6,;b", "Set 
6,e", "set 
6, (hl) ","set 
15D" 7 set 
7,e", "set 


7, (hl) ", "set 
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5,a" 
6;e%,' res 
6,h", "res 
6,a" 
7,c", "res 
7,n","res 
lean 
0,07, "set 
0,h™, "set 
0,a" 
Leo", set 
Ln, “Set 
la" 
2 eV SeE 
2,h","set 
2am 
Ser; set 
3,h","set 
3,a" 
4,c","set 
4,h","set 
4,a" 
5c", “SEE 
5;n",. "set 
57a" 
6,c","set 
6h", "set 
6,a" 
po", "set 
7,h","set 
7,a" 
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